Все делаются в паскале! 1) увеличить все элементы массива a на 1. 2) умножить все элементы массива a на 2. 3) возвести в квадрат все элементы массива a. 4) увеличить на 4 все элементы в первой половине массива a (считать, что в массиве чётное число элементов). 5) разделить на 2 все элементы массива a, кроме первого и последнего (считать, что в массиве есть, по крайней мере, два элемента и все элементы чётные). 6) умножить на 3 все элементы во второй половине массива a (считать, что в массиве чётное число элементов). 7) найти среднее арифметическое всех элементов массива a.

187

195

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

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

Typre35

Информатика

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

Var a: array [1..20] of integer; i,sum: integer; sr_a: real; begin {zadacha_1} for i: =1 to 20 do a[i]: =a[i]+1; {zadacha_2} for i: =1 to 20 do a[i]: =a[i]*2; {zadacha_3} for i: =1 to 20 do a[i]: =sqr(a[i]); {zadacha_4} for i: =1 to 20 div 2 do a[i]: =a[i]+4; {zadacha_5} for i: =2 to 20-1 do a[i]: =a[i] div 2; {zadacha_6} for i: =20 div 2 to 20 do a[i]: =a[i]*3; {zadacha_7} for i: =1 to 20 do sum: =sum+a[i]; sr_a: = sum/20; end.