Page 59 - MODUL PDKP'21

Modul 1 – Pemrograman, Algoritma dan Pascal 2021

Tabel 1.9 Contoh Program Sederhana
Flowchart Pseudocode Sourcecode
Program Program Pembelian_buku;
MULAI Pembelian_buku Uses crt,sysutils;
{Program ini digunakan Var
untuk data pembelian namabuku:string;
INPUT
namabuku, buku} harga,total:real;
harga, Deklarasi jumlah:integer;
jumlah namabuku:string Begin
harga,total:real Writeln(‘Selamat Datang di
jumlah:integer Toko Buku OASI’);
Deskripsi Algoritma writeln;
total  jumlah*harga Mulai writeln(‘Hari/Tanggal:
Baca (namabuku) ’,datetimetostr(now));
Baca (harga) writeln;
Baca (jumlah) writeln(‘Nama Buku
OUTPUT totalharga*jumlah :’);readln(namabuku);
total Tulis (total) writeln(‘Harga
Akhiri. :’);readln(harga);
writeln(‘Jumlah Pembelian:
SELESAI ‘);readln(jumlah);
Total:=harga*jumlah;
clrscr;
writeln(‘Total Harga :
‘),total:0:2);

readln;
end.

f) Contoh Penggunaan PASCAL N-IDE
1) Buka aplikasi PASCAL N-IDE, pilih ‘Open or create new file’ .

Gambar 1.2 Pascal N-IDE 1

Praktikum Dasar Komputer dan Pemrograman 2021 I - 44