danikustiawan.id - Halo sobat semua, kali ini DK kembali dengan artikel tutorial untuk pemrograman Pascal. Sebelumnya sobat bisa tentu sudah mengetahui dasar-dasar dari pemrograman Pascal, jadi DK di sini tidak akan menjelaskan lagi hal tersebut.

Oke, DK untuk kali ini akan membagikan tutorial sederhana implementasi dari aritmatika dalam pemrograman Pascal. Kita akan menuangkannya dalam Program Penghitung Luas Segitiga. Berikut script untuk program penghitung luas segitiga dengan pascal.

program luas_segitiga;
uses wincrt;
var
a,t: real;
L: real;
begin
clrscr;
write('Masukan Nilai Alas:');
readln (a);
write('Masukan Nilai Tingi:');
readln(t);
writeln(' ');
L:=(a*t)/2;
writeln('Luas Segitiga adalah =',L:6:2);
readln;
end.

Next, setelah mengetikan script di atas kita jalankan program dengan menekan Ctrl + F9, berikut hasilnya :
Ini adalah tampilan awal saat program dijalankan. User akan diminta untuk memasukan nilai dari alas segitiga.
Sebagai contoh kita masukan angka 5 untuk nilai alas lalu tekan enter, maka program akan meminta inputan kembali untuk nilai tinggi segitiga, masukan 12 dan tekan enter. Program akan secara otomatis menghitung luas segitiga.

Sebagaimana diketahui rumus luas segitiga adalah L=(a x t)/2. Untuk membuktika apakan hitungan dari program ini benar, mari kita hitung bersama.
L=(5 x 12)/2
L=60/2
L=30

Hasil perhitungan manual dan program pencari luas segitiga ternya sama, artinya program ini berjalan dengan benar. Oke sekian untuk tutorial sederhana kali ini. Sobat semua bisa download program penghitung luas segita melalui link di bawah. Semoga berguna.

Download Program Penghitung Luas Segitiga

「Dani Kustiawan」