Заменитт все точки запятыми paschal abc с любым текстом​

nata1316 nata1316    2   12.12.2019 08:44    0

Ответы
твоёсолнце7 твоёсолнце7  10.10.2020 20:09

var s: string;

i: integer;

begin

write('введите текст: ');

readln(s);

for i:=1 to length(s) do if s[i]='.' then s[i]:=',';

writeln('полученный текст:');

write(s);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика