Algoritma mesin couple (tugas prokomp)

Mesin abstrak untuk menghitung kemunculan suku kata yang terdiri dari 3 huruf (IND)

program cari3huruf;

kamus
jumlah: integer;

algoritma
jumlah <– 0;
START
while (CC<> ‘.’) do
if (CC=’I') then
ADV
if (CC=’N') then
ADV
if (CC=’D') then
jumlah <– jumlah + 1
endif.
endif.
endif.
ADV
endwhile.
output(jumlah)

Mesin abstrak untuk menghitung kemunculan suku kata yang terdiri dari 4 huruf (INDO)

program cari4huruf;

kamus
jumlah: integer;

algoritma
jumlah <– 0;
START
while (CC<> ‘.’) do
if (CC=’I') then
ADV
if (CC=’N') then
ADV
if (CC=’D') then
ADV
if (CC=’O') then
jumlah <– jumlah + 1
endif.
endif.
endif.
endif.
ADV
endwhile.
output(jumlah)

Mesin abstrak untuk menghitung kemunculan suku kata yang terdiri dari 5 huruf (FEBRI)

program cari5huruf;

kamus
jumlah: integer;

algoritma
jumlah <– 0;
START
while (CC<> ‘.’) do
if (CC=’F') then
ADV
if (CC=’E') then
ADV
if (CC=’B') then
ADV
if (CC=’R') then
ADV
if (CC=’I') then
jumlah <– jumlah + 1
endif.
endif.
endif.
endif.
endif.
ADV
endwhile.
output(jumlah)