Составьте программу вычисления среднего арифметического элементов массива А, состоящего из N элементов (N задается в блоке констант, элементы массива вводятся случайно и берутся из диапазона от -50 до 50). паскаль
Var ar:array[1..n] of integer; i:integer; sr:real; begin randomize; writeln('Аrray:'); for i:=1 to n do begin ar[i]:=random(-50,50); write(ar[i]:4); sr:=sr ar[i]; end; writeln; sr:=sr/n; writeln('Sr=',sr); end.
Пример работы программы: Аrray: -17 -7 31 49 -49 7 -6 17 30 37 25 -30 23 -40 7 Sr=5.13333333333333
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
