Senin, 02 April 2012

Menghitung luas segitiga dengan bahasa Pascal

Segitiga atau segi tiga adalah nama suatu bentuk yang dibuat dari tiga sisi yang berupa garis lurus dan tiga sudut. Matematikawan Euclid yang hidup sekitar tahun 300 SM menemukan bahwa jumlah ketiga sudut di suatu segi tiga adalah 180 derajat. Hal ini memungkinkan kita menghitung besarnya salah satu sudut bila dua sudut lainnya sudah diketahui.(wikipedia).

Rumus untuk mencari luas segitiga adalah :

Luas=(alas*tinggi)/2

Koding pascal untuk menyelesaikan luas segitiga adalah seperti dibawah ini;
var alas, tinggi, luas:real;

begin
write('Input Alas  : ');
readln(alas);
write('Input Tinggi : ');
readln(tinggi);
luas:=0.5*alas*tinggi;
writeln('Luas segitiga : ',luas:4:2);
readln;
end.

Tidak ada komentar:

Posting Komentar

Poskan Komentar Anda