Saturday, December 6, 2014

[TUTORIAL] Program Hitung Keliling Segitiga | Turbo Pascal

Setelah tutorial mencari Luas segitiga. Sekarang saya mau share tutorial turbo pascal mencari Keliling Segitiga dengan rumus = a+b+c.Untuk yang belum punya turbo pascal bisa di download DISINI

1. Tulis Source Code di Turbo Pascal

Source Code Di Tulis di Turbo Pascal

Source Code :
program hitung_kelilingsegitiga;
uses crt;
var a,b,c,keliling:integer;
begin
clrscr;
       writeln('=========================================================');
       writeln('Program Hitung Keliling Segitiga');
       writeln('=========================================================');
       writeln;
       write('Masukkan sisi A = ');
       readln(a);
       write('Masukkan sisi B = ');
       readln(b);
       write('Masukkan sisi C = ');
       readln(c);
       writeln;
       keliling:=a+b+c;
       writeln('Keliling  Segitiga = ',keliling);
       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

Bagikan

Jangan lewatkan

[TUTORIAL] Program Hitung Keliling Segitiga | Turbo Pascal
4/ 5
Oleh

Note: Only a member of this blog may post a comment.