Sisa Nafasku

kesunyian itu benar-benar datang,
aku tak pernah mengira,
apa yg memberiku motivasi sampai d'sini

seperti air mata yg telah mengering
berada d'tengah hujan yg memukulku,
aku tak menemukan akhirnya

walau tak seorangpun yg dapat melihat masa depannya
aku hanya membayangkan
dan berjalan dengan sisa nafasku.

butiran nyata.

ketika salju, salju itu berguguran.
ku tau, ini tak nyata.

seperti musim,
hatiku terus, berubah.

andai kau rasakan,
ada sebuah butir-butir,
yang terlihat nyata.

walau itu kecil,
t'pi aku mulai menulis lagi,

tanpa nada, tanpa suara.

For To Do pada PASCAL

Pernyataan For pada pascal memiliki struktur sebagai berikut :
for [nilai awal] to [nilai akhir] do [perintah yang di ulang]
Untuk contoh scriptnya seperti berikut :


ini script for to do for [nilai awal] to [nilai akhir] do [perintah yang di ulang]

--------------------------script--------------------------

uses crt;
var
a, b : integer;
begin
clrscr;
writeln ('masukan bilangan :');readln(a);
rof b:=1 to a do
writeln ('kalimat ini di ulang menggunakan pernyataan for');
readln;
end.

jika berhasil hasil tampilan sebagai berikut :



Misalkan kita masukan nilai 4 maka program akan menghitung dari nilai b:=1 sampai dengan nilai inputan yaitu 4 Ok....