
Вопрос задан 28.09.2023 в 20:03.
Предмет Информатика.
Спрашивает Лагутин Вова.
Задача: Среди заданных чисел найти произведение всех нечетных цифр. Если таких цифр нет - вернуть
1. Формат ввода: На первой строке задано количество чисел последовательности (неотрицательное, целое число не превосходящее 30000). На второй - элементы последовательности (целые числа в диапазоне от -30000 до 30000) через пробел. Формат вывода: Целое число. Пример входных данных 5 1 -20 -3 40 0 Пример выходных данных 3 Пояснение: 1 * 3 = 3 Паскаль ABC

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

Отвечает Горяйнов Павел.
Программа:
var
n, i, s, j, k: integer;
begin
write('Количество элементов в последовательности: '); readln(n);
s := 1;
for i := 1 to n do begin
read(j);
if j mod 2 = 1 then begin
s := s * j;
inc(k);
end;
end;
if k = 1 then writeln('1') else writeln(s);
end.



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Для решения этой задачи, вам нужно сначала считать ввод, затем выполнить необходимые вычисления и вывести результат. Вот пример Python-кода, который делает это:
python# Считываем количество чисел в последовательности
n = int(input())
# Считываем последовательность чисел и разделяем их
numbers = list(map(int, input().split()))
# Инициализируем переменную для хранения произведения нечетных цифр
product = 1
# Проходим по каждому числу в последовательности
for num in numbers:
# Проходим по каждой цифре в числе (в виде строк)
for digit in str(abs(num)):
# Преобразуем цифру обратно в целое число
digit = int(digit)
# Проверяем, является ли цифра нечетной
if digit % 2 == 1:
# Умножаем произведение на нечетную цифру
product *= digit
# Выводим результат
print(product)
Вы можете скопировать этот код и выполнить его, чтобы решить данную задачу. Вводите количество чисел и сами числа через пробел, как указано в вашем примере, и программа вернет произведение всех нечетных цифр из заданных чисел. Если нечетных цифр нет, программа вернет 1, как требуется в задаче.


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