строки, количество слов с разным кол-ом слогов Опции

[кучаТрупов]

задача: сколько слов в тексте имеет 1 слог,2 слога,3 слога и т.д.(кол-во слогов в слове совпадает с кол-ом гласных)

в Фак'е было только про *сколько раз заданное слово встречаетсся в тексте*
и больше я не нашла что бы мне помогло.

[amega]

- береш создаеш множество из гласных букв
- потом нашол первое слово в тексте
- проверяш по букво гласные, если гласная то i:=i+1;
- потом a[i]:=a[i]+1;

на выходе ми будем иметь масив где
в а1 будет содержатся количество 1 слог
в а2 будет содержатся количество 2 слог

тоесть чтото такого

const 
       glas=['А','а','Е','е','О','о','И','и','У','у','Ы','ы','Э','э','Я','я','Ю','ю'];
var 
    Mas : array [1..20] of integer;
    ch:char;
    i,k:integer;
    s:string;
begin
 {инициализация массива}

{цикл по тесту}
 ...
{получаем в s 1 слово}
 k:=0;
 for i:=1 to length(s) do 
   begin
        ch:=s[i];
        if (ch in glas) then k:=K+1;
   end;
 a[k]:=a[k]+1;     
{конец цикла}

{вывод}
end; 

хех пока писал текст уже меседжев понаписовали))

Сообщение отредактировано: amega - 19.03.2009 22:42