Di sini, ane akan bagi-bagi ilmu yang baru ane tau...
Perintah membuat rumus Luas Segitiga pada program Pascal
uses crt;
var
luas, alas,tinggi : integer ;
Begin
clrscr;
write('Masukkan alas Segitiga :');
Readln(alas);
Write('Masukkan tinggi Segitiga :');
Readln(tinggi);
luas:=alas*tinggi div 2;
Writeln('alas:',luas);
readln;
END
lalu tekan F9,, jadi deh program ya....
jangan lupa di comment ya sobat blog nya