Program Hitung_Luas_Segitiga; ( Algoritma dan Pemograman )

Program Hitung_Luas_Segitiga;

uses crt;

var
   luas   :real;
   alas   :real;
   tinggi :real;

begin
     write('Masukan Alas     : ');readln(alas);
     write('Masukan tinggi   : ');readln(tinggi);

     luas:=alas*tinggi/2;
     write('Hasil nya Adalah : ',luas:5:2);readln(luas);

end.