Программа: pascal abc.

Задание: дана строка, написать программу, вставляющую после каждой точки символ пробела.

Question

Антония

25 мая, 21:59

+5

Ответы (1)

Знаешь ответ?

Вероник · Answer 1

Var s1, s2:string; i:integer;

Begin

readln (s1);

for i:=1 to length (s1) do

s2:=s2+s1[i]+' ';

writeln (s2);

readln;

end.

Программа: pascal abc.Задание: дана строка, написать программу, вставляющую после каждой точки символ пробела.