Даны натуральное число n, символы S1… Sn, преобразовать последовательность, удалив…

Question

68

Даны натуральное число n, символы S1… Sn, преобразовать последовательность, удалив каждый символ '.' и повторив все остальные. Помогитепожалуйста, для последней зачетки в этом году. В паскале…

в избранное ссылка

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

naomi · Accepted Answer

40

naomi

22 августа 2022

vars: string; n: integer; beginreadln (n); readln (s); for i: =1 to n do if (s[i]='.') then delete (s,i,1) else insert (s[i],s,i); writeln (s); end.

комментировать

в избранное ссылка отблагодарить