Membuat program biodata menggunakan Turbo pascal

Membuat Program sederhana

program biodata;

uses crt;
var
nama, alamat : string;
umur : integer;
begin
clrscr;
writeln('===========================================');
writeln(' Biodata');
writeln('===========================================');
write('Nama : '); readln(nama);
write('Umur : '); readln(umur);
write('Alamat : '); readln(alamat);
writeln('-------------------------------------------');
writeln('Jadi data Anda : ');
writeln('Anda bernama ',nama,'. Umur Anda ',umur,' tahun. Anda tinggal di ',alamat,'.');
writeln;
readkey;
end.

Kalau sudah ditulis semua, silakan compile program tersebut untuk melihat hasilnya.

Cara meng-compile nya sebagai berikut :

1. Klik RUN
2. Klik Run

Hwhwhwh… cara yang lebih mudah yaitu hanya dengan menekan tombol Ctrl + F9.

Udah kelihatan kan hasilnya?

Nah coba dicermati dulu…. penjelasannya ada di bawah :

• ‘Uses Crt’ merupakan salah satu unit di pascal. Unit yang satu ini harus digunakan jika ingin menggunakan perintah ‘clrscr’ (perintah untuk membersihkan layar) dan ‘readkey’ (perintah untuk membaca masukan user).

• ‘Var’ merupakan bagian pendeklarasian variabel yang di dalamnya memuat tipe-tipe data, seperti string, integer, byte, word, char, dll.

• Setiap listing program utama harus diawali dengan huruf ‘begin’ dan diakhiri dengan ‘end.’ (ingat! jangan lupa titik(.) nya pada end.)

• Perintah untuk mencetak adalah ‘write’. Jadi kalau mau mencetak “Halo, saya pascal” yaitu dengan perintah :

write('Halo, saya pascal')

Tapi selain write, ada juga perintah ‘writeln’. Bedanya kalau ‘write’ setelah mencetak kursornya tetap disamping, sedangkan kalau ‘writeln’ kursornya ke bawah. Untuk contohnya dapat dicermati dari listing program tadi.

• Perintah ‘read’ dan ‘readln’ digunakan untuk membaca input yang dimasukkan user. Perbedaan antara keduanya sama dengan ‘write’ dan ‘writeln’.

• Jangan lupa untuk menuliskan tanda titik dua (;) di setiap akhir baris program.