
Задача: Дано целое число, найти произведение цифр кратных 3, но не кратных 9


Ответы на вопрос

program vnec997;
var proizvedenie, x, a: integer;
begin
writeln('Дано целое число, найти произведение цифр кратных 3, но не кратных 9');
writeln;
readln(x);
proizvedenie := 1;
while (x > 0) do
begin
a := x mod 10;
if ((a mod 3 = 0) and (a mod 9 <> 0)) then proizvedenie := proizvedenie * a;
x := x div 10;
end;
writeln('Произведение цифр кратных 3, но не кратных 9 равно ', proizvedenie);
readln;
end.



//с++
#include <iostream>
#include <cmath>
signed main() {
int N, prod = 1;
std::cin >> N;
N = abs(N);
while (N > 0) {
if (N % 10 % 3 == 0 && N % 10 % 9 != 0)
prod *= N % 10;
N /= 10;
}
std::cout << prod;
return 0;
}



Для решения данной задачи, необходимо выполнить следующие шаги:
1. Преобразовать целое число в строку. 2. Проитерироваться по каждой цифре в строке. 3. Проверить, является ли цифра кратной 3 и не кратной 9. 4. Если цифра удовлетворяет условию, умножить ее на результат и сохранить новое значение. 5. Вернуть результат.
Пример кода на языке Python:
```python def multiply_digits(num): num_str = str(num) result = 1
for digit in num_str: digit = int(digit) if digit % 3 == 0 and digit % 9 != 0: result *= digit
return result ```
Пример использования:
```python print(multiply_digits(123456789)) # Вывод: 6, так как только цифры 3 и 6 удовлетворяют условию print(multiply_digits(987654321)) # Вывод: 1, так как нет цифр, удовлетворяющих условию ```
Таким образом, функция multiply_digits находит произведение цифр, которые являются кратными 3, но не являются кратными 9.


Похожие вопросы
Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili