👤
DENISNOVAC2001ZE
a fost răspuns

Se consideră tabloul T[1..n,1..n] cu elemente numere întregi .Sa se compună un program care va calcula suma elementelor ce nu se află pe diagonala principală si elementul maximal de pe diagonala principală a matricei T.

Răspuns :

LOZANALEXZE
var a:array [1..10000,1..10000] of integer;
n,m,i,j,max,suma,x:integer;

begin

  //citirea datelor
  read(n,m);
  for i:=1 to n do 
    for j:=1 to m do
      read(a[i,j]);

  //calculul sumei elementelor ce nu se afla pe diagonala principala
  for i:=1 to n do
    for j:=1 to m do 
     if (i<>j) then suma:=suma+a[i,j];

    //calculul elementului maximal de pe diagonala principala
  max:=a[1,1];
  if (n<m) then x:=n else x:=m;
  for i:=2 to x do   
if (a[i,i]>max) then max:=a[i,i];   

//afisarea datelor 
writeln('Suma elementelor ce nu se afla pe diagonala principala ',suma);  write('Elementul maximal de pe diagonala principala ',max);
end.
Vă mulțumim pentru vizita pe site-ul nostru dedicat Informatică. Ne dorim ca informațiile furnizate să vă fi fost utile. Dacă aveți întrebări sau aveți nevoie de suport suplimentar, nu ezitați să ne contactați. Revenirea dumneavoastră ne bucură, iar pentru acces rapid, adăugați-ne la favorite!


Ze Lesson: Alte intrebari