83

Задание 1. Составьте программу вычисления количества двузначных чисел, которые…

24 марта 2023

Задание 1. Составьте программу вычисления количества двузначных чисел, которые кратны 2 и 3. Задание 2. Составьте программу, выводящую на экран все двузначные числа, у которых первая цифра в два раза больше второй. Задание 3. Составьте программу вычисления количества трехзначных чисел-палиндромов (чисел, которые читаются одинаково слева направо и справа налево). Задание 4. Найдите количество двузначных чисел, которые делятся на сумму своих чисел.

категория: информатика

52

Задание 1Var i: Integer; Begin For i: =1 to 99 do If i mod 2=0 Then Write (i,'); WriteLn (#13,#10,'Числа кратны 2'); If i mod 3=0 Then Write (i,'); WriteLn (#13,#10,'Числа кратны 3'); end.

Знаете ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...