Algoritma Pengisian Bahan Bakar

Algoritma Membeli BBM
{ Algoritma Simulasi Membeli Bahan Bakar Minyak }

Deklarasi
uang, liter, tampil, harga, pertamax, premium, solar        : double
pil, ambil                                                                      : karakter

Deskripsi
 0 ← harga
 4500 ← premium
 5000 ← pertamax
 7500 ← solar

Read (ambil)

Read (pil)

If (pil = 1) then
Read (uang)
If(ambil = a) then
 premium ← harga
Else if (ambil = b) then
 pertamax ← harga
Else if (ambil = c) then
 solar ← harga  
End if
 uang / harga ← tampil
Write(tampil)
Else if (pil = 2) then
Read (liter)
If(ambil = a) then
 premium ← harga
Else if (ambil = b) then
 pertamax ← harga
Else if (ambil = c) then
 solar ←harga
End if
 harga * liter ← tampil
Write(tampil)
End if