Berikut ini adalah program sederhana mencari luas segitiga di pascal yang saya buat sendiri, dan saya meletakkan 2 angka dibelakang koma, ketika suatu saat jawabannya adalah bilangan desimal. berikut adalah coding programnya, semoga bermanfaat untuk semuanya.jazakumullah Khair.
USES CRT;
VAR
ALAS,TINGGI, LUAS:REAL;
BEGIN
CLRSCR;
WRITELN('=============================');
WRITELN('PROGRAM MENCARI LUAS SEGITIGA');
WRITELN('=============================');
WRITELN(' ');
WRITE('MASUKKAN ALAS =');READLN(ALAS);
WRITE('MASUKKAN TINGGI=');READLN(TINGGI);
LUAS:=0.5*ALAS*TINGGI;
WRITELN('LUAS SEGITIGA ADALAH =',LUAS:6:2);
READKEY;
END.
