Все делаются в паскале! 1) увеличить все элементы - вопрос №1782023112 от Nastiakot1 17.04.2023 16:12

Question

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

Nastiakot1 · Answer

Vara: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....