После каждого третьего символа в тексте поставить - вопрос №9922708 от violagugu 10.01.2020 13:33

Question

Информатика: После каждого третьего символа в тексте поставить точку паскальprogram pr1; uses crt; var a: string; i: integer; beginwriteln ( введите строку ); read (a); for i: =length (a) downto 1 do insert( . ,a,i+3); writeln( полученная строка = ,a); readln; end.либо другим возможным через insert

violagugu · Answer

программа на PascslABC под турбопаскаль подправить думаю справишься самостоятельно...

var

s : string;

begin

writeln('введите строку: ');

read(s);

for var i := 1 to s.Length div 3 do insert('.', s, i*4);

writeln('полученная строка: ', s);

end.