Сформировать массив из n(n< =100) случайных целых чисел из [-50; 50] и вычислить 1) среднее арифметическое отрицательных чисел; 2) сумму чисел кратных 4; 3) произведение чисел из (-10; 10).

283

375

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

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

Dima85211

Информатика

4,4(38 оценок)

// pascalabc.net 3.3, сборка 1555 от 21.10.2017 // внимание! если программа не работает, обновите версию! begin var a: =arrrandom(readinteger('n=',50); a.println; writeln('среднее арифметическое отрицательных чисел: ', a.where(x-> x< 0).average); writeln('сумма чисел, кратных четырем: ', a.where(x-> x mod 4=0).sum); writeln('произведение чисел на интервале [-10; 10]: ', a.where(x-> x.between(-10,(biginteger(,y)-> x*y)) end. пример n= 90 2 -7 -9 23 49 3 -38 -3 -24 -50 -1 44 -33 -14 -39 42 -29 12 5 -27 35 -46 -23 36 26 18 -30 10 18 25 19 2 28 37 -21 4 40 42 10 23 5 -14 6 -10 35 11 -26 19 45 -36 38 44 29 17 -36 -2 -35 5 47 -19 -17 2 30 1 -18 48 -34 -19 -44 8 -49 -20 -48 32 18 -2 -1 38 -49 -35 -6 1 16 4 37 26 24 -40 23 32 среднее арифметическое отрицательных чисел: -25.1052631578947 сумма чисел, кратных четырем: 124 произведение чисел на интервале [-10; 10]: -10450944000000

alisaaaaaa1

Информатика

4,6(80 оценок)

57 кб = 57*1024 байт = 57*1024*8 бит 57 мб = 57*1024 кб = 57*1024*1024 байт = 57*1024*1024*8 бит 57 гб = 57*1024 мб = 57*1024*1024 кб = 57*1024*1024*1024 байт = 57*1024*1024*1024*8 бит