Решить в паскале: составить программу,проверяющую,является ли заданное натуральное число палиндромом,т.е. таким,которое читается одинаково слева направо и справа налево(например: 23132).
jumaev1998
2
17.05.2019 18:20
0
Другие вопросы по теме Информатика
xiumin90
07.06.2019 14:40
hlipkaya
07.06.2019 14:40
annagj200430
07.06.2019 14:40
мадина523
04.08.2019 00:40
qaz160904
16.05.2020 20:49
lrydg2363
16.05.2020 20:49
Scuum
16.05.2020 20:48
irca1987
16.05.2020 20:47
королева5720
27.10.2020 19:58
ОМЛА
27.10.2020 19:57
Популярные вопросы
- Написать сочинение на тему любой подвиг геракла...
2 - Continue the dialogue. customs officer: you said you had nothing...
1 - Какой объем при 500 мм рт.ст. и 100с будут занимать 4г азота?...
2 - 1. каким путем произошло объединение италии? 2. охарактеризуйте политический...
2 - Каким вы себе представляете разсказчика в сказке медной горы хозяйка...
3 - Составить 10 вопросов по сказке слепой музыкант...
2 - Что такое слой осадочных горных пород? 5 класс краткий ответ...
3 - Составте план ответа на вопрос какими средствами пользовался автор...
1 - Применив распределительный закон, представь числитель в виде произведения,...
2 - Существуют ли целые числа,большие 3 и меньшие 6;...
3
var n, m, p: word;
begin
write('Enter number: ');
readln(n);
m := n;
p := 0;
while m > 0 do begin
p := p * 10 + m mod 10;
m := m div 10;
end;
if n = p then
writeln('Palindrome')
else
writeln('Not palindrome');
readln;
end.