Дано слово. Определить, одинаковы ли второй и четвертый символы в нем.
Var s:string;
b:boolean;
begin
readln(s);
b:=false;
if s[2]=s[4] then b:=true;
Writeln(b);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
