Page 40 - MODUL DASKOM 2020
P. 40
Modul 1 – Pemrograman, Algoritma dan Pascal 2020
Tabel 1.7 Operator Perbandingan Pascal
Operator Penjelasan
= Sama dengan
<> Tidak sama dengan
> Lebih besar
< Lebih kecil
>= Lebih besar sama dengan
<= Lebih kecil sama dengan
e. Contoh Kasus Program Sederhana
Buatlah flowchart, pseudocode dan Source Code untuk mencari harga tiket dimana didalamnya disisipkan
tanggal pada program tersebut !
Tabel 1.8 Contoh Program Sederhana
Flowchart Pseudocode Source Code
Program perhitungan Program perhitungan;
MULAI {Program ini digunakan untuk Uses crt, sysutils;
menghitung pembelian tiket} Var
Deklarasi J :integer;
J:integer H, T:real;
H,T:real Begin
INPUT Deskripsi Algoritma Writeln(‘Selamat Datang OASI
J, H Mulai CINEMA’);
Baca (J) Writeln;
Baca (H) Writeln(‘Hari / Tanggal : ’,datetimetostr(now));
T J x H Writeln;
Tulis (T) Write(‘Masukan jumlah : ’);readln(j);
Akhiri Write(‘Masukan harga : ‘);readln(h);
T:=J*H;
T J*H Clrscr;
Writeln(‘Hari / Tanggal :’,datetimetostr(now));
Writeln;
Writeln(‘Total Pembayaran ‘,T:0:2);
Readln;
End.
OUTPUT
T
SELESAI
Praktikum Dasar Komputer & Pemrograman 2020 I-39