С клавиатуры вводится 10 чисел. Найти произведение - вопрос №1582533410 от meladse1105 17.05.2020 23:11

Question

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

meladse1105 · 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), В граница интервала (вводим с клавиатуры).