Contoh Sederhana menghitung luas lingkaran dengan aplikasi pascal secara otomatis

 

Pascal memang bahasa pemrograman yang cocok bagi kita pemula yang belajar pemrograman terutama untuk memahami algoritma untuk proses penyelesaian masalah.

Untuk menghitung luas lingkaran menggunakan rumus:

Luas lingkaran = π × r²Keliling = 2*pi*r

Langkah langkah membuat Program Luas Lingkaran 

1. Buka Aplikasi Pascal di Komputer

2. Klik File New

3. Masukan Source Code Berikut ini

Berikut Sourcode Pascal Membuat Program Luas lingkaran

Program Luas_Lingkaran;

uses crt;

const pi=3.14;

var r:integer;

luas,kel:real;

begin

clrscr;

writeln('Hitung Keliling dan Luas Lingkaran');

writeln('==================================');

write('jari-jari:');readln(r);

luas:=pi*r*r;{Rumus Luas Lingkaran}

kel:=2*pi*r;{Rumus Keliling Lingkaran}

writeln('Luas:',luas:2:1);

writeln('keliling:',kel:2:1);

readln;

end.

4. setelah selesai klik File save as dengan nama sendiri

5. Kemudian Pilih Tools Run-Run

Bila Berhasil maka akan tampil seperti berikut ini 

Demikian Tutorial yang dapat Golet Ilmu bagikan semoga bermanfaat.