CONTOH PROGRAM REKENING (PASCAL)
program contohrekening;
type
recordrekening = record
nomerrekening : integer;
nama : string;
alamat : string;
saldo : double;
end;
var
rek : recordrekening;
begin
writeln('INPUT DATA REKENING ');
write('NOMER REKENING :');
readln(rek.nomerrekening);
write('NAMA :');
readln(rek.nama);
write('ALAMAT :');
readln(rek.alamat);
write('SALDO AWAL :');
readln(rek.saldo);
writeln('MENAMPILKAN DATA REKENING');
writeln('NOMER REKENING :',rek.nomerrekening);
writeln('NAMA PEMILIK :',rek.nama);
writeln('ALAMAT :',rek.alamat);
writeln('SALDO :',rek.saldo:0:2);
readln;
end.
SEMOGA BERMANFAAT
No comments:
Post a Comment