составить программу нахождения среднего арифметического элементов массива состоящий из 5 элементов

program mas;

var ...

...

Var s, i:integer; Mas: array[1 ... 10] of integer; begin Mas[1]:=14; Mas[2]:=10; Mas[3]:=-8; Mas[4]:=6; Mas[5]:=12; Mas[6]:=4; Mas[7]:=-16; Mas[8]:=-7; Mas[9]:=5; Mas[10]:=3; s:=0; for i:=1 to 5 do Mas[2*i]:=-Mas[2*i-1];

Cрочно! паскаль var m, k, i; integer; mas; array [1 ... 10] of integer; begin mas[1]:=14; mas[2]:=44; mas[3]=72; mas [4]:=36; mas[5]:=58; mas[6]:=57; mas[7]:=48; mas[8]:=91; mas[9]:=62; mas[10]:=45;

Определите, что будет напечатано в результате выполнения следующего алгоритма var k, m, i: integer; mas:array[1 ...

Дана программа на языке программирования Паскаль. Запиши данную программу и запусти. uses crt; var mas, A: array[1 ... 10] of real; begin clrscr; mas[1]:=10; mas[5]:=27; mas[9]:=88; A[1]: = (mas[9]-mas[1]) * mas[5]; write (A[1]:5:0) ; readkey; end.

Дана программа на языке программирования Паскаль. Запиши данную программу и запусти. uses crt; var mas, A: array[1 ... 10] of real; begin clrscr; mas[1]:=11; mas[5]:=27; mas[9]:=89; A[1]: = (mas[9]-mas[1]) * mas[5]; write (A[1]:5:0) ; readkey; end.