С клавиатуры вводится 10 чисел. Найти произведение - вопрос №1015824832 от Nisson1 14.04.2021 09:03

Question

Информатика: С клавиатуры вводится 10 чисел. Найти произведение тех чисел, которые попадают на интервал (5, B), В граница интервала (вводим с клавиатуры).​

Nisson1 · Answer

PascalABC.NET:##var a := ReadArrInteger( Введите 10 чисел: , 10);var B := ReadInteger( Введите B: );a.Where(x → x in 6..(B-1)).Product.Print...

С клавиатуры вводится 10 чисел. Найти произведение тех чисел, которые попадают на интервал (5, B), В граница интервала (вводим с клавиатуры).​

С клавиатуры вводится 10 чисел. Найти произведение тех чисел, которые попадают на интервал (5, B), В граница интервала (вводим с клавиатуры).