Attik.A.P A
11 Oktober 2024 12:29
Iklan
Attik.A.P A
11 Oktober 2024 12:29
Pertanyaan
Ikuti Tryout SNBT & Menangkan E-Wallet 100rb
Habis dalam
01
:
23
:
17
:
30
4
2
Iklan
N. A
Community
13 Oktober 2024 01:05
Program luas_lingkaran;
Deskripsi
var pi, r, luas: float; auto_determine_pi: boolean;
Implementasi
WRITELN "Masukkan nilai jari-jari (r):"
READ r
WRITELN "Apakah anda ingin program menentukan secara otomatis nilai pi?"
READ auto_determine_pi
IF auto_determine_pi
pi = 22/7 IF fmod(r, 7) == 0.0 ELSE 3.14
ELSE
WRITELN "Masukkan nilai pi:"
READ pi
area = pi*pow(r, 2)
WRITELN "Luas lingkaran: " + area
Penjelasan:
Pertama, kita beri judul programnya. Dalam kasus ini karena untuk mencari luas lingkaran, maka judulnya kita bisa beri luas_lingkaran.
Program luas_lingkaran;
Kemudian kita tentukan variabel apa saja yang perlu digunakan. Kita akan menggunakan variabel pi, r, dan area yang bertipe float karena bisa berbentuk pecahan. Serta kita tambahkan variabel auto_determine_pi, yang kita bisa aktifkan sehingga program mendeteksi kalau r bisa dibagi 7, maka gunakan 22/7, jika tidak, 3,14 yang digunakan.
Maka bagian deskripsinya:
var pi, r, luas: float; auto_determine_pi: boolean;
Setelah itu kita tulis implementasinya.
Pertama, kita membaca inputan user terkait jari-jari dan apakah pi akan ditentukan secara otomatis oleh program.
WRITELN "Masukkan nilai jari-jari (r):"
READ r
WRITELN "Apakah anda ingin program menentukan secara otomatis nilai pi?"
READ auto_determine_pi
Kemudian, jika auto_determine_pi bernilai benar, tentukan nilai pi berdasarkan keterbagian r dengan 7. Jika r habis dibagi 7 maka 22/7 digunakan, namun jika tidak, 3.14 digunakan.
IF auto_determine_pi:
pi = 22/7 IF fmod(r, 7) == 0.0 ELSE 3.14
Namun jika tidak, program akan membaca input user terkait nilai pi yang akan digunakan.
ELSE
WRITELN "Masukkan nilai pi:"
READ pi
Setelah itu, luas siap dihitung. Ingat bahwa rumus luas lingkaran adalah L = ๐นrยฒ.
area = pi*pow(r, 2)
Setelah itu, tinggal cetak luasnya.
WRITELN "Luas lingkaran: " + area
Jadi, pseudocode kode algoritma mencari luas lingkaran adalah:
Program luas_lingkaran;
var pi, r, luas: float; auto_determine_pi: boolean;
WRITELN "Masukkan nilai jari-jari (r):"
READ r
WRITELN "Apakah anda ingin program menentukan secara otomatis nilai pi?"
READ auto_determine_pi
IF auto_determine_pi
pi = 22/7 IF fmod(r, 7) == 0.0 ELSE 3.14
ELSE
WRITELN "Masukkan nilai pi:"
READ pi
area = pi*pow(r, 2)
WRITELN "Luas lingkaran: " + area
ยท 0.0 (0)
Iklan
Rendi R
Community
14 Oktober 2024 02:12
Berikut adalah pseudocode untuk algoritma menghitung luas lingkaran:
START
// Deklarasi variabel
DECLARE radius AS FLOAT
DECLARE luas AS FLOAT
DECLARE phi AS FLOAT
// Inisialisasi nilai phi
SET phi TO 3.14
// Input radius
PRINT "Masukkan jari-jari lingkaran:"
INPUT radius
// Hitung luas lingkaran
luas = phi * radius * radius
// Tampilkan hasil
PRINT "Luas lingkaran adalah: " + luas
END
Pseudocode ini menjelaskan langkah-langkah untuk menghitung luas lingkaran, dengan mengambil jari-jari lingkaran sebagai input dan menggunakan rumus luas lingkaran yaitu ฯ dikali jari-jari kuadrat.
ยท 0.0 (0)
Tanya ke Forum
Biar Robosquad lain yang jawab soal kamu
LATIHAN SOAL GRATIS!
Drill Soal
Latihan soal sesuai topik yang kamu mau untuk persiapan ujian
Perdalam pemahamanmu bersama Master Teacher
di sesi Live Teaching, GRATIS!