Membuat Program Luas Lingkaran pada Pascal

Ulas-TKJ - Program Luas lingkaran merupakan salah satu program yang biasanya dijadikan studi kasus pada mata pelajaran pemrograman dasar atau pada mata kuliah algoritma pemrograman. meskipun tergolong sederhana jika tidak teliti di dalam menentukan tipe data dari variabel, maka program ini tidak akan berjalan dengan baik. baiklah kalau begitu kita ikuti langkah-langkah membuat program luas lingkara di dalam pascal

1. Analisis Variabel

sebelum membuat program luas lingkaran alangkah baiknya kita menganalisis berapa banyak variabel yang kita butuhkan. di dalam luas lingkaran sendiri ada 2 variabel yang kita butuhkan yaitu : 

• variabel input : phi dan jari2. karena phi nilainya tetap yaitu 3.14 maka phi dikategorikan sebagai konstanta, maka untuk variabel untuk kita cukup membutuhkan variabel yaitu variabel jari2 dengn tipe data integer. kita semua sudah tahu bahwasanya tipe data integer digunakan untuk bilangan bulat. Namun ketika kita ingin menginputkan pecahan desimal pada input luas lingkaran kita bisa mengganti tipe datanya menjadi real.
• Variabel Output. Karena program yang akan kita buat adalah program luas lingkaran jelas variabel outputnya adalah luas dengan tipe data real. mengapa kita menggunakan tipe data real? karena output dari perhitungan luas lingkaran pasti akan menghasilkan bilangan pecahan desimal sekalipun input jari2-nya menggunakan bilangan bulat (integer). hal ini dikarenakan konstanta phi yang bernilai 3.14. 

baca juga : Program Luas Persegi Panjang di dalam Pascal 

2. Flowchart

Flowchat (diagram arus) adalah diagram yang merupakan standarisasi programmer sebelum membuat program. flowchart ini bersifat general, artinya bisa digunakan untuk semua bahasa pemrograman. di bawah ini adalah flowchart program luas lingkaran 

3. Koding Program

Koding program merupakan perintah utama di dalam bahasa pemrograman ketika kita membuat sebuah program. di bawah ini adalah koding luas lingkaran di dalam program pascal

Program Luas_lingkaran;

uses crt;
var jari2: integer;
luas : real;
const phi=3.14;
begin
clrscr;
write('masukan jari-jari : '); readln(jari2);
luas:=phi*jari2*jari2;
writeln('luas lingkaran : ', luas:2:2);
readln;
end.

4. Output Program

Setelah selesai membuat koding dari program, langkah terakhir adalah mengeksekusi program. di dalam program pascal perintah untuk mengeksekusi program adalah Ctrl+F9. jika anda sudah memasukan koding sesuai dengan gambar diatas dengan benar maka akan menghasilkan output seperti pada gambar di bawah ini:

kita tingal memasukan nilai dari jari-jari, maka ketika kita menekan enter akan langsung keluar luas lingkaran seperti pada gambar di bawah ini

Seperti yang telah saya bahas sebelumnya luas lingkaran akan menghasilkan pecahan desimal. membuat program luas lingkaran di dalam pascal mudah bukan? silakan anda coba membuat keliling lingkaran di dalam pascal.

Terima Kasih telah berkunjung. "Berkah Berbagi"