Page 75 - Modul Daskom 2020
P. 75
Modul 3 – Array, Record dan Pemrograman Modular 2020
Deklarasi
pelayanan:string
harga,total:real
jumlah:integer
Deskripsi Algoritma
Mulai
Baca(pelayanan)
Baca(jumlah)
Baca(harga)
Totaljumlah x harga
Tulis(total)
Selesai
Deskripsi Algoritma
Mulai
Baca(JenisPelayanan)
BerbagaiPelayananSalon
Selesai
Contoh Source code Variabel Lokal dan Global :
Program OASIsalon ;
Uses crt;
Var // variabel global
JenisPelayanan:string;
Procedure BerbagaiPelayananSalon;
Var // variabel lokal
pelayanan:string;
harga,total:real;
jumlah:integer;
Begin
clrscr;
write('Jenis Pelayanan :');readln(pelayanan);
write('jumlah Pelayanan :');readln(jumlah);
write('Harga Pelayanan :');readln(harga);
total:=jumlah*harga;
writeln('Total pembayaran Rp. ',total:0:2);
readln;
End;
Begin // program utama
clrscr;
writeln('SELAMAT DATANG DI SALON OASI');
write('Silahkan masukan jenis pelayanan anda :');readln(JenisPelayanan);
readln;
BerbagaiPelayananSalon; // memanggil prosedur
writeln;
readln;
End.
Parameter
Parameter adalah variabel dalam sebuah subprogram yang gunanya untuk
menampung nilai yang dikirim oleh program utama. Dalam program memerlukan
pertukaran informasi antara prosedur dan titik dimana ia dipanggil. Penggunaan
Praktikum Dasar Komputer & Pemrograman 2020 III-73