Составьте программу вычисления количества трёхзначных чисел-палиндромов.
5-9 класс
|
var i,s:integer;
Begin
for i := 100 to 999 do
if (i mod 10 = i div 100) then s=s+1;
writeln(s);
End
Другие вопросы из категории
язык программирования паскаль
подробным решением.
дан одномерный массив размерностью 40 элементов, изменяющийся от -100 до 100. определить максимальный элемент массива и его номер без учёта максимального. это нужно в паскале.
а) находящихся в вашем портфеле
б) расположенных на Рабочем столе компьютера
г) изучаемых на уроках биологии
д) изучаемых на уроках математики
е) изучаемых на уроках географии
ж) изучаемых на уроках информатики
Читайте также
2.Составьте программу вычисления количества трёхзначных чисел палиндромов ( чисел, которые читаются одинаково слева направо и справа налево).
3.Найти двухзначные числа, которые делятся на сумму своих цифр
4.Составьте программу вывода количества трёхзначных чисел, у которых цифры упорядочены строго по убыванию.
РЕБЯТА СРОЧНО!!!!!!!!!!!