profile
Опубликовано 6 лет назад по предмету Информатика от VNBor34rus

Пусть дан русский текст, слова которого разделены пробелами, запятой или точкой. Все слова оканчивающиеся  на -онок или -енок , представьте во множественном числе.

  1. Ответ
    Ответ дан Аккаунт удален
    var
      t,m:string;
      i:integer;
    begin
    readln(t);
    m:='нки';
    for i:=1 to length(t) do
      begin
      if ((t[i]=' ') or (t[i]=',') or (t[i]='.'))
        and((copy(t,i-4,4)='онок') or (copy(t,i-4,4)='енок'))
           then
             begin
             delete(t,i-3,3);
             insert(m,t,i-3);
             end;
      end; 
    writeln(t)
    end.
Самые новые вопросы