Program Sederhana Pascal 2

Program Biodata;
uses crt;
var
nama, npm, kelas : string;
begin
clrscr;
writeln ('nama anda adalah :', nama);
readln (nama);
writeln ('npm anda adalah :', npm);
readln (npm);
writeln ('kelas anda adalah :', kelas);
readln (kelas);
readln;
end.


Output :


nama anda adalah :
Putri Citra Rahman
npm anda adalah :
15111639
kelas anda adalah :
1Ka 39

Program Sederhana Pascal

Menghitung Keliling Prsegi Panjang

Program persegi;
uses crt;
var
pjg, lbr, hasil : integer;
begin
clrscr;
write ('masukkan panjang :');
readln (pjg);
write ('masukkan lebar :');
readln (lbr);
hasil := 2*(pjg+lbr);
writeln (hasilnya adalah :', hasil);
readln;
end.

Output

Masukkan panjang : 8
masukkan lebar : 3
hasilnya adalah : 22


Logika Pemrograman

1. Program;

Judul Program, merupakan deskripsi tentang isi program yang kita buat.

2. Uses crt;

Berisi kumpulan prosedur atau fungsi. Jadi setelah kita menuliskan uses crt; kita dapat menggunakan berbagai macam fungsi yang ada di dalamnya.

3. Var

Mengidentifikasi jenis variable atau tipe data yang digunakan

4. Begin

Untuk memulai program yang akan dijalankan

5. Clrscr;

Untuk membersihkan layar

6. Write

Digunakan untuk menampilkan isi dari suatu nilai variable.

7. Writeln

Digunakan untuk menampilkan isi dari suatu nilai variable pada baris baru

8. Read

Digunakan  untuk memasukkan (input) data lewat keyboard ke dalam suatu variabel.

9. Readln

Digunakan  untuk memasukkan (input) data lewat keyboard ke dalam suatu variable pada baris baru

10. End.

Untuk mengakhiri program