SAMOGLASNICI U REČENICI | ||
Broji koliko samoglasnika ima u rečenici koju ste upisali. |
||
CLS INPUT "Rečenica"; rec$ temp$ = "aeiou" d = LEN(rec$) FOR i = 1 TO d slovo$ = MID$(rec$, i, 1) p = INSTR(temp$, slovo$) IF p <> 0 THEN suma = suma + 1 END IF NEXT i PRINT "Broj samoglasnika je:", suma |