Cделать программу в Pascal по заданию:"Отыскать в двумерном массиве сумму массива,сумму

Cделать программку в Pascal по заданию:"Отыскать в двумерном массиве сумму массива,сумму частей по столбцам и среднее арифметическое по строчкам"

Задать свой вопрос
1 ответ
Пусть дан массив real arr[1..n][1..n1]
заведём массивы real s1[1..n], s2[1..n1]



n - кол - во строк
n1 - кол -во столбцов

Главная часть:

...
for i:= 1 to n do
s1[i] := 0;

for i:= 1 to n1 do
s2[i] := 0;

for i:=1 to n do begin
for j:=1 to n1 do begin
s1[i] := s1[i] + arr[i][j];
s2[j] := s2[j] + arr[i][j];
end;
s1[i] := s1[i] / n
end;



...

s1[i] - среднее арифметическое для i строчки
s2[i] - сумма частей для i столбца

Миха
Спасибо
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

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

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

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

Войти на сайт