Предмет: Информатика,
автор: Irkaa01
Написать программу, которая вычисляет произведение модулей элементов
одномерного массива, расположенных после первого положительного элемента. Массив состоит из 15 вещественных элементов.
Ответы
Автор ответа:
1
Ответ:
На питоне так:
Объяснение:
using math
mass = []
for i in range(15):
mass.append(int(input()) #Вводим массив
#Сама программа:
res = 1
was = False
for i in range(15):
if not was and mass[i] > 0:
was = True
if was:
res *= mass[i]
print(res)
Автор ответа:
1
А на PascalABC.NET вот так:
begin
var a := ReadArrReal(15);
Abs(a[a.FindIndex(p-> p > 0)+1:].Product).Println
end.
Интересные вопросы
Предмет: Математика,
автор: planshet222717
Предмет: Математика,
автор: 12makszuk2006
Предмет: Геометрия,
автор: zhdhd9sfph
Предмет: Математика,
автор: unkerson