FLOWCHART LIFT GEDUNG :
Cara kerja :
1.
start, lift standby
2.
pada saat menekan tombol, pintu lift akan
terbuka
3.
lalu tekan lantai yangh di tuju, bila tidak
menekan tombol lantai yang akan di tuju, maka lift hanya akan standby saja.
4.
Kemudian lift akan mengecek kondisi, apakah akan
naik atau turun.
5.
Bila kondisi down dan up tidak terpenuhi, maka lift akan kembli
ke cek tombol.
6.
Bila terpenuhi, maka lif akan naik atau turun,
menuju ke lantai yang diinginkan.
7.
Bila lift berhenti di lantai yang bukan dituju,
maka lift akan memilih kondisi untuk mengecek tujuan atau pintu terbuka.
8.
Bila telah sampai di lantai yang dituju, maka
lift akan memilih kondisi kembali, apakah lift kondisi mati atau tetap standby.
9.
Selesai.
Listing Program:
0.Begin
0.Z : = X + Y;
0.Writeln (‘Nilai X = ‘, X);
0.Writeln (‘Nilai Y = ‘, Y);
0Writeln (‘Nilai Z = ‘, Z);
0End;
0
0Var
1A, B, C : Byte;
Begin
A := 5; B:= 7; C:=3;
Hitung (A, B, C);
Writeln (‘Nilai A = ‘,A,’Nilai B = ‘,B,’Nilai C = ‘,C);
Readln;
End.
<strong>Contoh program (by
Reference)</strong>
1
Function Hitung (Var X, Y, Z : Byte): Byte;
Begin
.Z : = X + Y;
.Writeln (‘Nilai X = ‘, X);
.Writeln (‘Nilai Y = ‘, Y);
Writeln (‘Nilai Z = ‘, Z);
.End;
.
.Var
A, B, C : Byte;
Begin
A := 5; B:= 7; C:=3;
Hitung (A, B, C);
Writeln (‘Nilai A = ‘,A,’Nilai B = ‘,B,’Nilai C = ‘,C);
Readln;
End.