Page 61 - Modul Daskom 2020

Modul 2 – Pengkondisian, Looping, Decision dan Compound 2020

Contoh Pseudocode Compound :
Program compound
{Program jadwal tayangan Film XXI}

Deklarasi
nama,harga,jadwal:string
no:char

Deskripsi Algoritma
mulai
baca(no)
jika no='1' maka
mulai
Nama’Black Widow’
Harga’Rp. 35.000,00’
Jadwal’11.30, 16.30, 19.20’
selesai
jika no='2' maka
mulai
Nama’Venom II’
Harga’Rp. 35.000,00’
Jadwal’12.30, 17.30, 19.20’
selesai
jika no='3' maka
mulai
Nama’The Eternal’
Harga’Rp. 35.000,00’
Jadwal’13.30, 20.30, 21.20’
selesai
tulis(nama)
tulis(Harga)
tulis(Jadwal)
selesai

Contoh Source Code Compound :
program compound;
uses crt;
var
nama,Harga,Jadwal:string;
no:char;
begin
writeln('Jadwal Tayangan Film XXI 23 September 2020');
writeln('1. Black Widow');
writeln('2. Venom II');
writeln('3. The Eternal');
write('Masukkan nomor pilihan film yang anda pilih : ');readln(no);
if no='1' then
begin
Nama:='Black Widow';
Harga:='Rp. 35.000,00';
Jadwal:='11.30, 16.30, 19.20';
end;
if no='2' then
begin
Nama:='Venom II';
Harga:='Rp. 35.000,00';
Jadwal:='12.30, 17.30, 19.20';
end;
if no='3' then
begin
Nama:='The Eternal';
Harga:='Rp. 35.000,00';
Jadwal:='13.30, 20.30, 21.20';

Praktikum Dasar Komputer & Pemrograman 2020 II-59