• Дана матрица. Вычислить сумму и число положительных элементов, находящихся под главной диагональю. Вывести матрицу, сумму и число.

Ответы 1

  • const N=4;var a:array[1..N,1..N]of integer;i,j,s,k:integer;beginfor i:=1 to N do for j:=1 to N do a[i,j]:=random(10);for i:=1 to N do begin for j:=1 to N do write(a[i,j],' '); if j=N then writeln; end;

    for i:=1 to N dofor j:=1 to N doif (i>j) then begin inc(k); s:=s+a[i,j]; end;writeln(s,' ',k);end.

  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years