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

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.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.