Выполнить практическую по информатике (до следующей недели). Голубым выделен нужный вариант.

125

422

Посмотреть ответы 1

Ответы на вопрос:

IvanUmnisa

Информатика

4,8(52 оценок)

// pascalabc.net 3.3 begin var n: =40; var a: =arrrandominteger(n,-40,40); a.println; var b: =a.where((x,i)-> (x> 0)and(i mod 2=0)); if b.count=0 then writeln(0) else writeln(power(b.aggregate(1,(p,q)-> p*q),1/b.count)); end. пример (для n=10): -19 38 -37 18 9 -5 17 29 19 -2 14.2718961622815