Algoritma menentukan hari

Deklarasi :
hari_ke : integer;

hari : string;

Deskripsi :

read (hari_ke);

case(hari_ke) of

1 : hari <– ‘Senin’;

2 : hari <– ‘Selasa’;

3 : hari <– ‘Rabu’;

4 : hari <– ‘Kamis’;

5 : hari <– ‘Jumat’;

7 : hari <– ‘Sabtu’;

8 : hari <– ‘Minggu’

endcase

write(hari)

==> Flowchart

selamat mencoba…