Даны натуральное число n и символы S1, ..., Sn (строка). Преобразовать данную строку, заменив в ней каждую точку многоточием (т. е. тремя точками).

Question

Информатика

Петоша

23 сентября, 06:04

Даны натуральное число n и символы S1, ..., Sn (строка). Преобразовать данную строку, заменив в ней каждую точку многоточием (т. е. тремя точками).

+2

Ответы (1)

Знаете ответ на вопрос?

Тонюня · Answer 1

var

n, i: integer;

S: string;

begin

readln (n) ;

readln (S) ;

i : = 1;

while (i < = n) do

begin

if (S[i] = '.') then

begin

insert (' ... ', S, i) ;

i : = i + 2;

n : = n + 2;

end;

i : = i + 1;

end;

writeln (S) ;

end.