Консультация № 155129
20.12.2008, 20:13
0.00 руб.
0 1 1
Даны натуральное число n, символы s1, ... , sn (n > 1).
Преобразовать последовательность s1, ... , sn, заменив запятыми все двоеточия, встречающиеся среди s1, ... , s[n/2], и заменив точками все восклицательные знаки, встречающиеся среди s[n/2]+1, ... , sn.

Обсуждение

Неизвестный
20.12.2008, 22:24
общий
это ответ
Здравствуйте, Иванов Виктор Олегович!
это простая задача - берется два цикла, до середины и за серединой и проверяется наличие знаков, который требуется заменить, что и происходит при нахождении.

Приложение:
const
nmax=100;

var
a:array[1..nmax] of char;
n,i,n2:integer;

begin
Read(n);
For i:=1 to n do
Read(a[i]);
n2:=n div 2;
For i:=1 to n2 do
if a[i]=':' then a[i]:=',';
for i:=n2+1 to n do
if a[i]='!' then a[i]:='.';
For i:=1 to n do
Write(a[i],' ');
end.
Форма ответа