membuat program luas segitiga dengan turbo pascal

copy from http://blog.diantama.id/2014/12/tutorial-program-hitung-luas-segitiga.html

[TUTORIAL] Program Hitung Luas Segitiga | Turbo Pascal

Pada tutorial kali ini saya mau berbagi cara membuat program hitung luas segitiga sederhana. Program ini dapat menghitung luas segitiga yang memiliki rumus (Alas x Tinggi) / 2. Untuk yang belum punya turbo pascal bisa di download DISINI atau DISINI

1. Tulis Source Code di Turbo Pascal

Source Code Di Tulis di Turbo Pascal

Source Code :

program hitung_luassegitiga;
uses crt;
var
   alas,tinggi:integer;
   luas:real;
begin
clrscr;
       writeln('=========================================================');
       writeln('Program Hitung Luas Segitiga');
       writeln('=========================================================');
       writeln;
       write('Masukkan Alas = ');
       readln(alas);
       write('Masukkan Tinggi = ');
       readln(tinggi);
       writeln;
       luas:=(alas*tinggi) div 2;
       writeln('Luas Segitiga = ',luas:0:2);
       readln;
end.

2. Compile Source Code dengan menekan ALT+F9

Compile Berhasil

3. Jalankan Program yang telah dibuat CTRL+F9

Program berjalan dengan sempurna

Sekian tutorial Turbo Pascal sederhana dari saya

Jangan lupa Comment & Share

untuk free pascal link nya Disini