Cara Membuat Program Luas Segitiga Dengan PASCAL

Langsung saja Qta mulai, :
kalo blom pnya, Download Pascal di sini

Program luas_segitiga;
uses wincrt;
var
alas, tinggi, luas : integer;
begin
clrscr;
writeln('Perhitungan Luas Segitiga');
writeln('--------------------------');
write('alas:'); readln(alas);
write('tinggi:');readln(tinggi);
luas:=alas*tinggi/2;
write('Luas Segitiga :',luas);
end.



Selamat_Mencoba
Load disqus comments

0 komentar





bitter.io - Free bitcoin, bitcoin advertising, ptc