4 Tampilkan (outputkan) Luas persegi panjang. Flowchart: Latihan: Buat algoritma dan Flowchart untuk Menghitung: 1. Luas Segitiga 2. Luas Lingkaran IMPLEMENTASI DALAM PROGRAM (Sebagai contoh: Bahasa Pemrograman Pascal) Pengertian PROGRAM: Kumpulan instruksi (statements) yang disusun secara logis untuk memecahkan suatu masalah. Berikutini adalah script yang sudah di praktekan/di ketik di program pascal : Inilah hasil dari program di atas : output. Diposting oleh 2. luas lingkaran dan keliling lingkaran. Flowchart : Algoritma : 1. mulai. 2. read luas,jari-jari,pi. program menghitung_luas_permukaan_bola; uses crt; var r:integer; l,v:real; begin. programmenghitung_luas_lingkaran; Uses wincrt; var L,r:real; ch:char; begin clrscr; writeln('masukkan nilai r:'); readln(r); L:=Pi*r*r; writeln('menghitung luas Fast Money. - Kita dapat mengimplementasikan program pascal yang berhubungan erat dengan kehidupan sehari-hari. Materi yang pernah kita pelajari dalam implementasi bahasa pemrograman pascal seperti halnya program percabangan, array, perulangan, runtutan, serta fungsi dan prosedur contoh dibawah ini dapat kamu coba dengan menggunakan compiler online yaitu OnlineGDB. Baca Juga Cara menggunakan compiler program di onlinegdb tanpa harus menginstall compiler digadget atau laptopmu. Semoga ulasan ini dapat kamu jadikan referensi tambahan dalam mempelajari bahasa program pascal, serta dalam menyelesaikan tugas - tugas yang sedang kamu Program Pascal Menghitung Luas Persegi PanjangSkrip dibawah ini digunakan untuk menghitung luas sebuah luas persegi panjang. Setiap instruksi yang diproses akan diolah mulai dari baris awal hingga akhir secara s_Luas_Persegi_Panjang;var s_panjang integer; s_lebar integer; s_luas integer;begin write 'Input Panjang = ';reads_panjang; write 'Input Lebar = ';reads_lebar; s_luas=s_panjang*s_lebar; writeln'Luas Persegi panjang = ',s_luas; bagian var mendeklarasikan beberapa variabel, diantaranya ada lebar, panjang, dan luas dari persegi panjang. Pada bagian begin, difungsikan sebagai perintah untuk memasukkan nilai dari variabel yang telah dideklarasikan diawal. Program akan bekerja sesuai dengan rumus yang telah diberikan. Kemudian akan ditampilkan sebagai luas persegi Program Pascal Menghitung Luas Lingkaranprogram Luas_Lingkaran;const pi= r real; luas real;begin write 'Masukan Jari-jari = ';readr; luas=pi*r*r; writeln'Luas = ',luas42; rumus perhitungan matematika, tentunya perlu penyesuaian. Termasuk program pascal untuk menghitung luas lingkaran. Dimana, rumus menghitung luas lingkaran phi 3,14, variabel r serta luas dengan tipe data real dalam hal ini memuat bilangan pecahan yang akan dihasilkan dari perhitungan rumus lingkaran. Pengguna akan memasukan jari-jari r yang kemudian program pascal akan melakukan perhitungan berdasarkana rumus luas lingkaran = pi*r*r;Terdapat instruksi pada bagian akhir dari program yaitu menampilkan total luas lingkaran dengan format 42 yang dimaksudkan untuk program agar dapat mencetak 4 angka sebelum diakhiri dengan tanpa koma sebagai pemisah sebuah nilai total desimal. Nah pada pengaturan ini nilai desimal program diatas adalah 2 dibelakang koma. Contoh Program Pascal Struktur Case program struktur_Case;var grade char;begin grade= 'A'; case grade of 'A' writeln'Luar biasa!' ; 'B' writeln'Bagus' ; 'C' writeln'Cukup' ; 'D' writeln'Kurang' ; 'F' writeln'Coba Lagi' ; else writeln'Grade nilai salah'; end; implementasi algoritma program percabangan atau pemilihan, kita dapat membuat suatu struktur case. Nantinya struktur case ini akan memproses seleksi atau perbandingan suatu nilai satu dengan yang halnya dengan contoh program diatas, bahwa grade A akan dibandingkan dengan grade lainya. Seandainya pada struktur case terdapat ekpresi yang sama dengan nilai grade makan perintah program dalam ekpresi tersebut akan diproses. Kemudian hasil output dari program pascal struktur case terdiri dari beberapa bagian, diantaranya LUAR BIASA karena grade A, terdapat nilai identitas A yang akan mencetak kalimat LUAR Program Percabangan IF ELSEprogram Percabangan_1;var bil integer;begin write 'Masukan Bilangan ';readbil; if bil mod 2 = 0 then begin writeln 'Bilangan Genap'; end else begin writeln 'Bilangan Ganjil'; end; diatas merupakan penerapan sturktur algoritma percabangan dengan menggunakan metode program percabangan if else. Algoritma percabangan if else ini merupakan sebuah proses yang akan digunakan untuk mengerjakan sebuah perintah yang memiliki kondisi benar dan salah atau false dan true. Maka dalam perintah program terdapat blok else yang akan diproses berdasarkan pertimbangan atau seleksi diatas digunakan untuk menentukan sebuah nilai atau bilangan yang dimasukkan yang bernilai ganjil ataupun genap. Dengan ukuran serta kondisi yang telah ditetapkan, seandainya bilangan modulus 2 menghasilkan sebuah nilai akhir 0 maka dipastikan bahwa bilangan yang dihasilkan adalah bilangan gelap. Namun, jika yang terjadi adalah sebaliknya maka bilangan tersebut adalah bilangan yang kita masukkan adalah angka 3 maka kondisi akan diteruskan pada nilai false, sehingga perintah pada program akan masuk ke proses else yang akan Perulangan Repeat Untilprogram repeat_until;var i,n integer;begin i= 1; write'Mencetak angka 1 sampai ke-N ';readn; repeat begin writelni; i= i + 1; end; until i > n; perulangan ini minimal melakukan sebuah satu kali iterasi yang kemudian dilanjutkan dengan beberapa kondisi yang akan di cek pada bagian akhir dari kamu memiliki sebuah nilan N dan dimasukkan angka 5, maka akan dilakukan perulangan yang dilakukan oleh nilai dari i=1. Selanjutnya nilai dari i kemudian akan ditambahkan 1 selama proses perulangan iterasi berjalan selama nilai i= 1000000 then begin diskon= end else if total >= 500000 then begin diskon= end else if total >= 250000 then begin diskon= end; tot_bayar=total-total*diskon; writeln'Sub total ',total; writeln'Potongan ',total*diskon00; writeln'Total Bayar ',tot_bayar00; program pascal diatas merupakan gambaran dari perhitungan nilai dari penjualan barang yang terbilang cukup sederhana. Didalamnya terdapat proses program runtunan yang menggunakan struktur pemilihan atau sebuah percabangan program. Contoh Program Pascal Menghitung Gaji Karyawanprogram menghitung_gaji_karyawan;var jum, gol, jkerja, jlembur, gapok, glembur, tun_pengabdian longint; pajakgapok, pajaklembur, totpajak,gajibersih real;begin gapok=0; tun_pengabdian=0; write'Masukan golongan ';readgol; write'Masukan jam kerja ';readjkerja; case gol of 1 begin gapok=1486500; tun_pengabdian=250000; end; 2 begin gapok=1926000; tun_pengabdian=300000; end; 3 begin gapok=2456700; tun_pengabdian=350000; end; 4 begin gapok=2899500; tun_pengabdian=400000; end; end; if jkerja>173 then begin jlembur=jkerja-173; end else begin jlembur=0; end; glembur=jlembur*20000; pajakgapok= pajaklembur= totpajak=pajakgapok+pajaklembur; gajibersih=gapok+tun_pengabdian+glembur-totpajak; writeln'Gaji Pokok ',gapok; writeln'Gaji Lembur ',glembur; writeln'Pajak Gaji Pokok ',pajakgapok46; writeln'Pajak Lembur ',pajaklembur46; writeln'Total Pajak ',totpajak46; writeln'Tunjangan Pengabdian ',tun_pengabdian; writeln'Gaji Diterima ',gajibersih46; program diatas merupakan contoh sederhana program pascal perhitungan gaji karyawan. Program ini bagian dari penerapan algoritma sekuensial. Semoga ulasan contoh program pascal diatas beserta penjelasanya dapat menambah referensi dan wawasan. Latihan Kode Program C++ Menghitung Luas Lingkaran 05 Oct 21 Tutorial C++ Latihan kode program C++ kali ini akan membahas cara menghitung luas lingkaran. Materi ini berhubungan dengan logika matematika dan penggunaan operator aritmatika. Soal Menghitung Luas Lingkaran Buatlah kode program C++ untuk menghitung luas lingkaran. Kode program butuh 1 inputan berupa nilai jari-jari lingkaran, dan menampilkan output luas lingkaran. Bonus soal buat juga dalam bentuk function. Berikut contoh tampilan akhir yang diinginkan 1 Input jari-jari lingkaran 7 Luas lingkaran = Berikut contoh tampilan akhir yang diinginkan 2 Input jari-jari lingkaran 10 Luas lingkaran = 314 Silahkan coba sebentar membuat kode program ini. Tips Membuat Kode Program Menghitung Luas Lingkaran Soal ini melatih pemahaman terkait logika matematika dan penggunaan operator aritmatika. Berikut tutorial pendahuluan yang bisa diikuti Pengertian Variabel dalam Bahasa C++ Jenis-jenis Operator Aritmatika Bahasa C++ Tipe Data Float dan Double Bahasa C++ Rumus untuk menghitung luas lingkaran adalah pi * jari-jari2. Untuk memudahkan pembuatan kode program, bisa ditulis sebagai * r * r. Kode Program C++ Menghitung Luas Lingkaran Berikut salah satu solusi dari soal menghitung luas lingkaran menggunakan bahasa pemrograman C++ include using namespace std; int main { cout > r; luas = * r * r; cout > r di baris 14. Nilai ini dipakai untuk menghitung luas dengan perintah luas = * r * r. Terakhir, luas lingkaran ditampilkan di baris 17. Proses perhitungan luas lingkaran sebenarnya juga bisa langsung dilakukan ke dalam perintah cout, tidak harus ditampung dulu ke variabel luas. Berikut contoh yang dimaksud include using namespace std; int main { cout > r; cout using namespace std; float hitungLuasLingkaranfloat r { return * r * r; } int main { cout > r; cout << "Luas lingkaran = "<< hitungLuasLingkaranr << endl; return 0; } Di awal kode program, tepatnya pada baris 5-7, saya mendefinisikan fungsi hitungLuasLingkaran. Fungsi ini menerima 1 argument yang disimpan ke dalam parameter r. Fungsi hitungLuasLingkaran hanya berisi 1 perintah yang langsung mengembalikan hasil perhitungan * r * r di baris 6. Proses pemanggilan fungsi dilakukan dari dalam perintah cout di baris 19. Nilai jari-jari r yang diinput oleh user, dilewatkan sebagai parameter menjadi hitungLuasLingkaranr. Demikian kode program menghitung luas lingkaran menggunakan bahasa pemrograman C++. Semoga tutorial ini bisa bermanfaat.

program pascal menghitung luas lingkaran