Дана строка. Если количество символов в ней нечетно ,то выведите на экран средний символ строки. Задача Паскаль.
var
s : string;
l : integer;
begin
readln (s);
l := Length(s);
if l mod 2 = 1 then
writeln (s[l div 2 + 1]);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
