Вычислить среднее арифметическое отрицательных частей выше основной и ниже побочной

Вычислить среднее арифметическое отрицательных элементов выше основной и ниже побочной диагонали.

Задать свой вопрос
1 ответ
Var i,j,n,x,kol,xx:int64;
begin
read(n);
for i:=1 to n do begin
   for j:=1 to n do begin
      read(x);
      if (i+jgt;n+1)and(ilt;j)and(xlt;0) then begin inc(kol); inc(xx,x); end;
      end;
      end;
writeln(xx/kol);
end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт