Составить программы в паскале: 1)дан массив из 10 элементов. найти среднее арифметическое. 2)дан массив из 15 элементов. найти сумму чисел 3)дан массив из 10 элементов. изменить каждое число, увеличив на 10 и вывести на экран новые значения.

#1 var   mas: array[1..10] of integer;   i,sum: integer;   begin   sum: =0;   for i: =1 to 10 do   begin     read(mas[i]);     sum: =sum+mas[i];   end;   writeln(sum/10);   end. #2 var   mas: array[1..15] of integer;   i,sum: integer;   begin   sum: =0;   for i: =1 to 15 do   begin     read(mas[i]);     sum: =sum+mas[i];   end;   writeln(sum);   end. #3 var   mas: array[1..10] of integer;   i: integer;   begin   for i: =1 to 10 do     read(mas[i]);   for i: =1 to 10 do   begin     mas[i]: =mas[i]+10;     write(mas[i],' ');   end;   end.

1)это направление куда будут двигаться все обьекты

2)число равное тому сколько раз исполнитель повторит ваш алгоритм