Есть ответ 👍

Опять с информатикой :(
!

179
311
Посмотреть ответы 1

Ответы на вопрос:

jokeaaaaff
4,6(33 оценок)

Program pr; uses crt; var s: string; i: integer; begin writeln('введите предложение'); readln(s); writeln; writeln(s); for i: =1 to length(s) do begin if (s[i]< > ' ') then write(s[i]) else writeln; end;   readkey; end.

Популярно: Информатика