Essay no 3 Soal Menghitung Jumlah Bus

Soal Menghitung Jumlah Bus
Sebuah acara wisatadigunakan bus yang berkapasitas 30 orang.Tulisalgoritmauntukmenghitungjumlah bus wisata yang diperlukanbilajumlahpesertadiINPUTdari keyboard.Catatan :bilajumlahpesertatidakkelipatan 30, makajikasisanya> 5 harusdisediakan 1 bus tambahan, bilasisanya<= 5 makatidakperlutambahan bus.

AlgoritmaWisata
//
Kamus Data
jpeserta  :
j_bus:
BEGIN
INPUT(jpeserta)
      ...
OUTPUT(j_bus)
END

 JAWAB:

ALGORITMA

var 

ijmlbus,ijmlpeserta,iSisa : integer ;

begin

 input(ijmlpeserta);

 if ijmlpeserta < 30 then

   if  ijmlpeserta mod 30 > 5 then

        ijmlbus := (ijmlpeserta div 30 ) + 1

   else

        ijmlbus := ijmlpeserta div 30

 else

   ijmlbus :=  0 ;

 input(ijmlbus)

end.