С клавиатуры вводится 10 чисел. Найти произведение - вопрос №1582443210 от nastya030513 15.01.2022 01:27

Question

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

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