CARA MEMBUAT PROGRAM MENGHITUNG LUAS SEGITGA PADA PASCAL
Kembali lagi dengan saya,kali ini saya akan membagikan
CARA MEMBUAT PROGTAM MEGHITUNG LUAS SEGITIGA PADA PASCAL. Langsung saja CEKIDOT.
Masukkan lah seperti gambar di bawah ini.
Program luasSegitiga;
VAR
a : real;
t : real;
l : real;
begin
write ('Alas Segitiga = ');
readln (a);
write ('Tinggi Segitiga = ');
readln (t);
l := a*t /2;
writeln;
write ('Luas Segitga = ',l:0:2,' cm^2');
writeln;
writeln ('Akhir Program');
readln;
end.
Kemudian klik COMPILE, berikan nama Luas_Segitga setelah COMPILE selesai klik RUN maka hasilnya akan seperti ini
Saya harap info ini dapat membantu :)
hasil program jadinya discreenshoot biar makin mantap.
BalasHapus