Cara Membuat Program Luas Bangun Dengan Turbo Pascal

CARA MEMBUAT PROGRAM LUAS BANGUN DENGAN TURBO PASCAL

Langkah-langkah nya:
=> Copy code berikut:
Program Menghitung_Luas_Segitiga;
uses wincrt;
var Alas, Tinggi, Luas : Integer;
begin
clrscr;
write ('Masukan Alas:');
readln (Alas);
write ('Masukan Tinggi:');
readln (Tinggi);
Luas := (Alas*Tinggi)/2;
Writeln ('Hasilnya:',Luas);
end.
=> Setelah dicopy, tekan alt+F9. Jika berhasil maka akan keluar compile succes
=> Lalu simpan dengan nama (terserah anda.pas) atau jika mau dalam bentuk program maka simpan (terserah anda.exe).

*Note: Cara ini dapat digunakan di lingkran atau yang lainnya, tinggal logika dari anda harus mengikutinya.