Var
    No Hari = Integer
     Begin
        Output(“Input no hari (1-7):”)
        Input (Nomor Hari)
     IF (nomorHari=1) then
              Output (“Senin”)
     IF (nomorHari=2)
              Output (“Selasa”)
     IF (nomorHari=3)
              Output (“Rabu”)
     IF (nomorHari=4)
              Output (“Kamis”)
     IF (nomorHari=5)
              Output (“Jumat”)
     IF (nomorHari=6)
              Output (“sabtu”)
     IF (nomorHari=7)
              Output (“Minggu”)
     Else
              Output(“Error”)
     END.
Tidak ada komentar:
Posting Komentar