program TulisNama; uses wincrt; var ANama: String; { Deklarasi variabel Name sebagai string } AUlang: integer; { variabel yang digunakan untuk perulangan } begin Write('Masukkan nama anda: '); Readln(ANama); { Readln akan membaca masukan yang dientrikan oleh pengguna } for AUlang := 1 to 100 do Writeln('Halo ', ANama) end.
Sabtu, 07 Mei 2011
For.... to... do...
Dan berikut ini contoh program PASCAL yang meminta masukan nama dan menuliskannya kembali di layar sebanyak seratus kali:
Beda Notebook, Laptop, Netbook, dan Nettop !

Sebenarnya tidak terlalu banyak perbedaan dari ketiga kata tersebut. Intinya me-refer pada satu istilah ‘komputer jinjing’ atau ‘komputer lipat’.
Notebook merupakan istilah awal yang muncul bersamaan dengan tibanya era komputer jinjing. Ukurannya lebih kecil dan lebih efektif untuk dibawa ke mana saja, jika dibandingkan dengan desktop PC atau komputer rumahan yang besarnya ’segede gaban’.
Langganan:
Postingan (Atom)