
Анисим
6 год назад
Дана строка. Если ее длина есть число нечетное ,то удалить два первых символа . В противном случае после среднего символа вставить строку 'www'
ОТВЕТЫ

Новаковский
Jul 7, 2019
Var
s:string;
n:integer;
begin
Readln(s);
n:=Length(s);
if Odd(n) then Delete(s,1,2)
else Insert(www,s,n div 2+1);
Writeln(s)
end.
s:string;
n:integer;
begin
Readln(s);
n:=Length(s);
if Odd(n) then Delete(s,1,2)
else Insert(www,s,n div 2+1);
Writeln(s)
end.
207
Смежные вопросы: