Fungsi Menghitung Huruf Konsonan

Judul : Function HitungKonsonan (text <- char) -> integer

Kamus :

{

indeks <- int

indeks <-0

jmlh <- int

jmlh <-0

Deskripsi :

while (text [indeks] ! =’\0′) then

if (text [indeks] !=’a’ || text [indeks] !=’i’|| text [indeks] !=’u’||text [indeks] !=’e’||text [indeks] !=’o’) then

(jmlh <-++)

else if

(text [indeks] !=’A’|| text [indeks] !=’I’|| text [indeks] !=’U’|| text [indeks] !=’E’||text [indeks] !=’O’) then

(jmlh<-++)

else

(indeks <++)

end if

return (jmlh)

}

Fungsi Menghitung Huruf Vokal

Judul : Function HitungVokal (text <- char) -> integer

Kamus :

{

indeks <- int

indeks <-0

jmlh <- int

jmlh <-0

Deskripsi :

while (text [indeks] ! =’\0′) then

if (text [indeks] ==’a’ || text [indeks] ==’i’|| text [indeks] ==’u’||text [indeks] ==’e’||text [indeks] ==’o’) then

(jmlh <-++)

else if

(text [indeks] ==’A’|| text [indeks] ==’I’|| text [indeks] ==’U’|| text [indeks] ==’E’||text [indeks] ==’O’) then

(jmlh<-++)

else

(indeks <++)

end if

return (jmlh)

}