belajar pascal 2 ( SMP ISLAM TAUFIQURRAHMAN )

BELAJAR PASCAL 2 

( SMP ISLAM TAUFIQURRAHMAN )

Kali ini akan diberikan materi tentang mencari luas bidang datar, diantaranya luas persegi panjang, luas segitiga, dan lain sebagainya. Pada bahasan Belajar Pascal ke 1, telah disinggung tentan type data real. Type data real merupakan salah-satu dari type data jenis bilangan desimal. Selain real, bilangan Desimal (float) yang lain diantaranya single, double, extented, comp, currency.

penggunaan type data real dalam pembulatan sebagai berikut :

12.567 ----> dituliskan 2:3 atau boleh 0:3
12  ------> dituliskan 2:0 atau boleh 0:0
345.98 -----> dituliskan 3:2 atau boleh 0:2

contoh 
carilah luas persegi panjang menggunakan bahasa pemrograman pascal.

penjelasan :
Tentunya kita telah mengetahui rumus luas persegi panjang adalah panjang dikali lebar. Variabel (var) yang disimpan adalah panjang, lebar dan luas.

Jawab dengan program pascal

program luaspersegi;

uses crt;

var panjang, lebar, luas : real;

begin 

    clrscr;

    write ('masukan panjangnya '); readln(panjang);

    write ('masukan lebarnya     '); readln(lebar);

    luas:= panjang*lebar;

    writeln ('luas persegi panjang adalah = ' ,luas:0:0);

    readln;

end.

atau menggunakan aplikasi FPC sebagai berikut :

outputnya bila diisi panjang 10 dan lebar 5 adalah :

jika coding untuk real diganti menjadi 0:2 maka akan ada desimal dua. 

Perhatikan coding dan output program dibawah ini :

outputnya bila diisi panjang 10 dan lebar 5 adalah :