[TUTORIAL] Program Hitung Lingkaran | Turbo Pascal

Programming Tutorial

Setelah Tutorial cara Menghitung Persegi. Sekarang ini adalah tutorial Turbo Pascal kedua saya yaitu Tutorial Program Hitung Lingkaran dengan Turbo Pascal. Dalam program ini kalian bisa menghitung Luas dan Keliling suatu lingkaran. 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 hitunglingkaran;
uses crt;
var
   r:integer;
   keliling,luas:real;
const
   phi=3.14;
begin
clrscr;
       writeln('=======================================');
       writeln('Program Hitung Lingkaran');
       writeln('=======================================');
       writeln;
       write('Masukkan Jari-Jari Lingkaran = ');
       readln(r);
       luas:=phi*r*r;
       writeln;
       writeln('Luas Lingkaran = ',luas:0:2);
       keliling:=2*phi*r;
       writeln('Keliling Lingkaran = ',keliling: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 sederhana dari saya

semoga bermanfaat bagi pembelajaran

Jangan lupa Like & Share ya

Bagikan

Jangan lewatkan

[TUTORIAL] Program Hitung Lingkaran | Turbo Pascal

4/ 5

Oleh Unknown

Unknown 16:07 Komentar