Ответ:
var
s : string;
begin
(* можно проверять не только числа, но и строки, т.к. число представлено в виде строки *)
write('Введите пятизначное число : ');
readln(s);
if (s[1]=s[3]) and (s[3]=s[5]) then
writeln('Совпадают')
else
writeln('Не совпадают');
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
var
s : string;
begin
(* можно проверять не только числа, но и строки, т.к. число представлено в виде строки *)
write('Введите пятизначное число : ');
readln(s);
if (s[1]=s[3]) and (s[3]=s[5]) then
writeln('Совпадают')
else
writeln('Не совпадают');
end.