написать двумерный массив. найдите среднее арифметическое частей массива данных

Написать двумерный массив. найдите среднее арифметическое элементов массива данных случайным образом [0..20]

Задать свой вопрос
Сергей Суслянко
ну помогите
1 ответ
Program enot;
Var a: array [1..3,1..3] of integer;
i,j,s:integer;  c: real;
begin
for i:= 1 to 3 do 
 for j:= 1 to 3 do 
 begin
 a[i,j]:= random (20);
 s:=s+a[i,j];
 end;
c:=s/9; 
write(c:4:2);
 end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт