На завтра ! напишите программу, которая определяет полиндром четырехзначное число или нет. можно в паскале !
atchaschinovр
3
17.05.2019 14:50
2
Другие вопросы по теме Информатика
vipmurlyan
19.03.2019 15:05
Varkorn
19.03.2019 16:00
saaafffina8902
22.12.2020 21:35
Dangerrr
02.02.2021 09:43
Софочкакошечка13
02.02.2021 09:45
001Карина11111
02.02.2021 09:46
oal64
14.03.2019 22:46
Популярные вопросы
- Які деталі свідчать про те, що гітчі-маніто є володарем природного світу?...
1 - C³₆-c₆²/a²₆ найдите значение выражения...
1 - Списочная численность рабочих предприятия –530 человек, из них механизированным...
2 - Болит голова правая часть. с чем это связанно? как лечить? ...
2 - Вполдень самолёт вылетел из столицы в город энск и приземлился там в 14 часов...
2 - Растворимость нитрата серебра при 0°с, 30°с и 60°с составляет соответственно...
2 - Какое влияние на намагниченность вещества оказывают тепловые колебания молекул?...
1 - Нужна морфологический разбор...
1 - Растворимость безводного ацетата натрия в воде при 10°с – 40,8 г, а при 60°с...
1 - Практичний зошит 8 клас в.м.бойко . практична робота 11 . завдання 1: зіставте...
3
var n:integer;
BEGIN
read(n);
if (n > 9999 or n<1000) then
writeln('Вы дурак')
else begin
if (n mod 10 = n div 1000 and n mod 100 div 10 = n div 100 mod 10) then
writeln('Полиндром')
else writeln('Нет');
end;
END.