Дана строка. Если количество символов в ней нечетно ,то выведите на экран средний символ строки. Задача Паскаль.
Ответы
Ответ дал:
0
var
s : string;
l : integer;
begin
readln (s);
l := Length(s);
if l mod 2 = 1 then
writeln (s[l div 2 + 1]);
end.
s : string;
l : integer;
begin
readln (s);
l := Length(s);
if l mod 2 = 1 then
writeln (s[l div 2 + 1]);
end.
djrazor308:
Вы выводите последний символ. А не средний.
Вас заинтересует
11 месяцев назад
11 месяцев назад
1 год назад
6 лет назад
6 лет назад
7 лет назад