Uses crt berfungsi untuk memanggil unit library pascal.
Var berfungsi untuk mendeklarasikan, disini yang dipakai
yaitu luas, alas, dan tinggi karena untuk menghitung luas segitiga.
Begin berfungsi untuk memulai program.
Real bermaksud untuk menentukan bahwa bilangan tersebut
adalah bilangan real, karena hasil pembagian sehingga tidak dapat mmenggunakan
integer.
Clrscr berfungsi untuk membersihkan layar yang ada di dalam
unit CRT, untuk dapat memakai clrscr, unit crt harus
Uses dalam deklarasi unit.
Rumus luas segitiga adalah (alas x tinggi) : 2, seperti yang
sudah di deklarasikan diatas tadi.
Fungsi writeln adalah untuk mencetak hasil atau sebagai
output. Perbedaan write dengan writeln adalah terletak pada baris, jika kita
menggunakan write kursor akan kursor akan diletakkan di samping output sehingga
tidak akan menghasilkan baris baru sedangkan untuk writeln akan menghasilkan
baris baru karena kursor di letakkan dibawah hasil dari output.
Fungsi readln adalah untuk membaca nilai pada variabel yang
kita input.
Dan end berfungsi untuk mengakhiri program diakhiri dengan
tanda titik.
Setelah mengetikkan listing code kita dapat melakukan kompilasi, dan
seperti inilah hasil yang keluar jika program yang kita ketikkan sudah benar
Melakukan kompilasi dengan nama file segitiga.pas dengan total baris
16 baris
Setelah melakukan kompilasi kita dapat
menjalankan program seperti dibawah ini:
Kita masukkan alas yang diinginkan misalnya 3, tinggi misalnya 4,
sehingga luas yang tertera adalah 6 sesuai dengan rumus luas segittiga (3x4) :
2 = 6.
Untuk nama, npm, dan kelas merupakan output yang diketikkan pada
source code.
untuk mendownload source code dapat klik disini
untuk mendownload source code dapat klik disini
Nama : Emellika Rahmayana
NPM : 12110361
Kelas : 3KA28
