Дан массив 10 целых чисел, в диапазоне от 1 до 30. Найти произведение элементов массива, кратных написать программу!

Yelena-Svetlana

22.06.2022

ответ

begin

ReadArrInteger(10).Where( x -> x mod 5 = 0).Product().Print();

end.

PascalABC.NET

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Дан массив 10 целых чисел, в диапазоне от 1 до 30. Найти произведение элементов массива, кратных написать программу!

▲