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

program cari3huruf;

kamus
jumlah: integer;

algoritma
jumlah <-- 0;
START
while (CC<> '.') do
if (CC='O') then
ADV
if (CC='S') then
ADV
if (CC='H') then
jumlah <-- jumlah + 1
endif.
endif.
endif.
ADV
endwhile.
output(jumlah)



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

program cari4huruf;

kamus
jumlah: integer;

algoritma
jumlah <-- 0;
START
while (CC<> '.') do
if (CC='O') then
ADV
if (CC='S') then
ADV
if (CC='H') then
ADV
if (CC='I') then
jumlah <-- jumlah + 1
endif.
endif.
endif.
endif.
ADV
endwhile.
output(jumlah)



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

program cari5huruf;

kamus
jumlah: integer;

algoritma
jumlah <-- 0;
START
while (CC<> '.') do
if (CC='H') then
ADV
if (CC='E') then
ADV
if (CC='W') then
ADV
if (CC='A') then
ADV
if (CC='N') then
jumlah <-- jumlah + 1
endif.
endif.
endif.
endif.
endif.
ADV
endwhile.
output(jumlah)