While

Masih ingat dengan soal pertama pada Bab 1A? Sekarang, Pak Dengklek memberikan versi soal yang sedikit lebih sulit. Program Anda harus membaca banyak baris masukan, dan mencetak kembali sejumlah baris tersebut yang isinya sama dengan masukan tersebut.

Format Masukan

Banyak baris, antara 1 sampai 100 baris, masing-masing berisi sebuah kalimat yang terdiri atas 1 sampai 100 karakter.

Format Keluaran

Sejumlah baris sesuai masukan yang isinya sama persis dengan masukan.

Contoh Masukan

abc
123

Contoh Keluaran

abc
123

Petunjuk

Ubah baris berikut pada soal Program Pertamaku

readln(kalimat);

menjadi

while not eof(input) do
begin
    readln(kalimat);
    writeln(kalimat);
end;

Dalam deretan perintah di atas terdapat struktur loop (perulangan) while, dengan struktur umumnya:

while <kondisi> do
begin
    <perintah-perintah>
end;

Dengan struktur seperti di atas, program akan menjalankan terus <perintah-perintah> selama <kondisi> bernilai benar. eof(input)adalah kondisi di mana berkas habis dibaca. Jadi, dengan menambahkan operator ingkaran not di depannya, artinya program akan terus membaca baris-baris selama berkas belum habis dibaca.

Untuk menguji program Anda, buatlah berkas teks 'uji2.txt' (seperti 'uji.txt' namun dituliskan dalam beberapa baris) dan uji program Anda dengan cara yang sama seperti pada soal Program Pertamaku.

Jawabannya adalah :