1. Дано трехзначное число. Выяснить, является ли оно палиндромом («перевертышем»), то есть таким числом, десятичная запись которого читается одинаково
5-9 класс
|
слева направо и справа налево
program xxx;
var n, c, d, e, k : integer;
begin
wtite ('введите 3-х значное число N =');
readln (n);
c := n div 100;
d := (n div 10) mod 10;
e := n mod 10;
k:= 100*e + 10*d + c;
if n = k then write ('палиндром') else write('не палиндром')
end.
Другие вопросы из категории
чем хранение на внешних носителях отличается от хранения в оперативной памяти?
Читайте также
1) есть ли среди цифр заданного трехзначного числа одинаковые;
Пример входных данных
123 нет
121 да
222 да
2) является ли число '' перевертышем" , т.е. числом , десятичная запись которого читается одинаково слева направо и справа налево.
Пример входных данных
122 нет
121 перевертыш
222 перевертыш
Пожалуйста с примером!!!
Заранее большое спасибо
десятичная запись которого читается одинаково слева направо и справа налево Пример входных данных: 122, 121, 222 Пример выходных данных: нет, перевертыш, перевертыш
вывести -1 например 4 является квадратом 2 а 17 не является квадратом никакого числа.
читается одинаково слева направо и справа налево.. имя входного файла Input.txt, имя выходного файла output.txt
а) есть ли среди цифр заданного целого трёхзначного числа одинаковые;
пример входных данных: 123; 121; 222
пример выходных данных: нет; да; да
б) является ли число "перевёртышем", т.е. числом, десятичная запись которого читается одинаково слева направо и справа налево.