Pascal:Menghitung luas segi empat: Difference between revisions

Created page with "*Algoritma Luas Segi Empat **Algoritma menerima masukan panjang dan lebar segiempat **Menghitung luasnya **Cetak luasnya ke piranti keluaran (Layar) *Deklarasi : **Panjang =..."
 
 
(2 intermediate revisions by the same user not shown)
Line 5: Line 5:


*Deklarasi :
*Deklarasi :
**Panjang = Int {tipe data bilangan bulat}
**Panjang = <code>Int</code> (tipe data bilangan bulat)
**Lebar = Int {tipe data bilangan bulat}
**Lebar = <code>Int</code> (tipe data bilangan bulat)
**Luas = Int {tipe data bilangan bulat}
**Luas = <code>Int</code> (tipe data bilangan bulat)


*Deskripsi:
*Deskripsi:
**Baca variabel Panjang
**Baca variabel Panjang
**Baca variabel Lebar
**Baca variabel Lebar
**Hitung luas Segi 4 = Panjang * Lebar
**Hitung luas Segi 4 = <code>Panjang * Lebar</code>
**Tampilkan luas ke layar
**Tampilkan luas ke layar
**Selesai
**Selesai
Line 33: Line 33:


==Program==
==Program==
  program Hitung_Luas_Segi_Empat; {judul program hitung luas segi empat}
  program Hitung_Luas_Segi_Empat; {judul program hitung luas segi empat}
  uses crt;
  uses crt;
Line 49: Line 48:
   readln;
   readln;
  end.
  end.


==Terkait==
==Terkait==