programpascal menghitung berat; program pascal meng hitung lingkaran; program pasacal menghitung kerucut; program penghitung jarak; program konstanta; program array pascal; kode pascal konversi waktu; code pascal kurs; pascal code menukar niali; menghitung volume dan luas; code pascal menghitung kkm nilai; code pascal menghitung persegi; code
Kali ini saya lanjutkan untuk contoh program pascal sederhana untuk menghitung luas lingkaran. sebagai info saja sebelumnya juga saya bagikan artikel menghitung luas persegi panjang di pascal. 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² Keterangan pi = = jari-jari pi merupakan nilai konstanta yang meruakan perbandingan keliling lingkaran dengan diameternya, sementara r adalah jari-jari lingkaran sebagai jarak antara titik pusat dengan tepi lingkaran. Algoritma Bahasa Natural MulaiInisialisasi nilai pi sebagai konstantaMasukan Jari-jariHitung luas Tampilkan luas lingkaranSelesai Bentuk Pseudocode PROGRAM Luas_Lingkaran DEKLARASI pi r real luas real ALGORITMA read r luas <- pi * r * r write luas program Luas_Lingkaran; const pi= var r real; luas real; begin write 'Masukan Jari-jari = ';readr; luas=pi*r*r; writeln'Luas = ',luas42; end. Program di atas kita menggunakan konstanta pi dengan nilai Variabel yang di deklarasikan adalah r sebagai jari-jari dan luas masing-masing dengan tipe real bilangan pecahan. pada bagian main utama program kita mencetak kalimat Masukan jari-jari’ menggunakan perintah write dan pengguna di minta memasukan nilai pada layar console yang akan di tampung pada variabel r. Perintah masukan di pascal menggunakan fungsi read. Selanjutnya program akan menghitung luas lingkaran sesuai rumus yang kita definisikan. Program akan menampilkan hasil dengan menampilkan hasil perhitungan luas lingkaran. Perhatikan pada baris program ke-10 pada bagian sintak untuk mencetak luas42 maksud dari sintak ini adalah untuk mencetak 4 angka sebelum tanda titik tanda pemisah bilangan desimal, dan 2 digit setelah tanda koma. sebagai informasi bahwa Pascal menggunakan tanda titik sebagai penanda angka desimal. Hasil output di atas menunjukan hasil program-nya, di mana ketika saya memasukan jari-jari dengan nilai 5 maka luas lingkaran adalah 78,50. Sekian pembahasan singkat mengenai contoh program pascal untuk menghitung luas lingkaran, semoga bermanfaat dan membantu teman-teman dalam belajar algoritma dan pemrograman khusus dengan bahasa pascal.
StrukturCASE-OFELSE merupakan pengembangan dari struktur CASE-OF dan juga merupakan pengembangan dari standar Pascal. Pada struktur CASE-OF bila tidak ada kondisi yang terpenuhi berarti tidak ada statemen di dalam lingkungan CASE-OF yang diproses. Dengan struktur CASE-OFELSE, bila tidak ada kondisi yang terpenuhi, maka statemen yang akanGambar3.1 Input Program Luas Lingkaran Gambar 3.2 Output Program Luas Lingkaran a) Bagian Judul Program ini diberi judul program yaitu Program Lingkaran. Bagian judul program berfungsi untuk memberi nama program dan sifatnya optional. Jika ditulis harus terletak pada awal dari program dan diakhiri dengan titik koma (;). b) Uses Crt Suatu unit adalah kumpulan dari konstanta, tipe-tipe data
1 MODUL I MEMULAI PROGRAM PASCAL A. TUJUAN 1. Mengenal bahasa pemrograman Pascal 2. Memahami struktur program Pascal 3. Mampu membuat program Pascal sederhana B. DASAR TEORI 1. Struktur Program Pascal PROGRAM nama_program; USES unit1, unit2, unit3; CONST Deklarasi konstanta; TYPE Deklarasi type data; VAR Deklarasi variabel; BEGIN Instruksi
. program pascal menghitung luas lingkaran
