Запишите фрагмент программы, который позволит для заданного пятизначного числа, определить, является ли оно палиндромом.

Question

Информатика

Натан

29 октября, 08:44

Запишите фрагмент программы, который позволит для заданного пятизначного числа, определить, является ли оно палиндромом.

+2

Ответы (1)

Знаете ответ на вопрос?

Кирьяна · Answer 1

Var c: string;

begin

write ('Введите пятизначное число: ') ;

readln (c) ;

if (c[1] = c[5]) AND (c[2] = c[4]) then writeln ('Число является палиндромом!')

else writeln ('Число не является палиндромом!') ;

end.