Составить программу, которая подсчитывает количество палиндромов среди натуральных четырехзначных чисел. pascal
cactuscus
2
18.07.2019 13:40
4
Другие вопросы по теме Информатика
volfxeniya
21.04.2019 13:39
0rus0
21.04.2019 13:36
ElizabethFoxEl
07.07.2019 08:20
юра419
07.07.2019 08:20
soykaksyu
01.10.2021 06:07
maksalina2
04.05.2021 21:35
герман123344444
27.04.2021 17:21
Lara138009
27.04.2021 17:22
aaaaanastya92
21.09.2021 08:22
Популярные вопросы
- С. 15 , , 1. докажите,что кутузов народный полководец,что он близок к народу....
1 - Составте сочинение на языке, тема: сша. не менее 15 предложений и желательно...
2 - Составить текст на тему природа зимой , используя безличные предл-ия (8...
3 - Моє розуміння афоризмів г. сковороди(твір роздум) (2-3 сторінки) ...
3 - Осуществите цепочки превращений...
1 - Составь список водоемов нашего края с карты края ( дубна , московская обл)...
3 - Цена товара сначала повысилась на 20%,затем на 12%.сколько процентов составляет...
1 - Яка питома теплота плавлення заліза?...
1 - Яку масу води можна нагріти на 20°с, надавши їй 84000 дж теплоти? ...
3 - Скласти твір із 3-х абзаців на тему: вічна пісня дитинства(за повістю м....
3
i, k: integer;
begin
k:=0;
for i:=1000 to 9999 do
if (i div 1000 = i mod 10) and (i div 100 mod 10 = i mod 100 div 10) then
inc(k);
writeln(k);
end.