Cara membuat rumus lingkaran menggunakan pascal

Membuat rumus lingkaran menggunakan pascal

Pertama tama kita buka aplikasi turbo pascal pada desktop untuk membuat rumus lingkaran dari Bahasa pascal

Kalau sudah terbuka langsung saja ketikkan codingannya seperti diatas ini

1.      Uses crt; berfungsi untuk menampilkan library jadi kalo tidak ada uses crt tidak bisa menampilkan clrscr;

2.      Const untuk menampilkan nilai konstanta yang sifatnya itu tetap atau tidak dapat bisa diubah ubah

3.      Phi = 3.14; yaitu phi yang bernilai 3.14

4.      Var itu berfungsi untuk menampilkan variabel

5.      Jari jari = integer; yaitu berfungsi untuk menampilkan tipe data yang bernama integer

6.      Luas = real; yaitu luas sama dengan tipe data angka yang mengandung nilai pecahan positif maupun negatif

7.      begin itu berfungsi untuk memulai kerja pada program pascal

8.      clrscr; berfungsi untuk membersihkan layar

9.      writeln(‘masukan jarijari=’); berfungsi untuk menampilkan jari jari yang bertipe data integer atau bersifat angka

10.  readln(jarijari); yaitu berfungsi untuk menampilkan jari jari dari keyboard untuk menampilkannya di layar

11.  luas:= phi*jarijari*jarijari; yaitu berfungsi untuk menghitung luas lingkaran dengan menggunakan nilai phi yang bernilai 3.14 dan jari jari yang akan kita masukkan nantinya.

12.  write(‘luas=’,luas); berfungsi untuk menampilkan luas. Yang luasnya itu berisi phi*jarijari*jarijari

13.  readln; berfungsi untuk menampilkan variabel pada layar

14.  end. Untuk mengakhiri/menyelesaikan suatu program yang telah dibuat

kalau sudah silahkan klik run atau ctrl + F9 untuk menjalankan program yang telah kita buat tadi.