CONTOH if - then - else

ALGORITMA PENENTUAN HARI :

1. Tentukan hari
2. Tentukan kode hari
3. Masukkan kode hari
4. Jika angka 1= hari senin
5. Jika angka 2 = hari selasa
6. Jika angka 3 = hari rabu
7. Jika angka 4 = hari kamis
8. Jika angka 5 = hari jum’at
9. Jika angka 6 = hari sabtu
10. Jika angka 7 = hari minggu
11. Hasil


GAMBAR FLOWCHAT NYA : 

UJI TURBO PASCAL :

program penentuan_hari;
uses winCrt;
var
   kode: byte;

begin
       ClrScr;
       write('masukkan kode hari[1..7]:');
       readln(kode);

writeln;

if kode=1 then
writeln('hari senin')
else
if kode=2 then
writeln('hari selasa')
else
if kode=3 then
writeln('hari rabu')
else
if kode=4 then
writeln('hari kamis')
else
if kode=5 then
writeln('hari jumat')
else
if kode=6 then
writeln('hari sabtu')
else
if kode=7 then
writeln('hari minggu');
readln;
end.

PROSES PENULISAN PROGRAM :

Jika berhasil akan muncul, gambar di bawah ini :

jika memasukkan data akan menghasilkan :