Напишите программу поиска все двузначных чисел, в которых есть цифра n, или само число делится на n
5-9 класс
|
(решите по паскалю).
var
i, n: integer;
begin
readln(n);
for i := 10 to 99 do
if (i mod 10 = n) or (i div 10 = n) or (i mod n = 0) then write(i:4);
end.
Var
i,n: integer;
begin
readln(n);
for i:= 10 to 99 do
if (i mod 10 = n) or (i div 10 = n) or (i mod n = 0) then writeln(i)
end.
Другие вопросы из категории
a := 42;
b := 14;
a := a div b;
b := a*b;
a := b div a;
2) программа проверяет является ли введенное число нечетным и при этом делится на 5
3) задача нахождения факториала числа
ЗАРАНЕЕ ОГРОМНОЕ СПАСИБО!!!!!
Читайте также
2.Составьте программу вычисления количества трёхзначных чисел палиндромов ( чисел, которые читаются одинаково слева направо и справа налево).
3.Найти двухзначные числа, которые делятся на сумму своих цифр
4.Составьте программу вывода количества трёхзначных чисел, у которых цифры упорядочены строго по убыванию.
РЕБЯТА СРОЧНО!!!!!!!!!!!
количества трехзначных чисел, у которых сумма цифр является чётным числом.
ОЧЕНЬ СРОЧНО!!!