👤
a fost răspuns

Scrieți un program care calculează suma fiecărui rând a unei matrice (Pascal)

Răspuns :

NIKTELZE

Răspuns:

program SL;

var m:array[1..100,1..100] of integer;

   i,j,n,s:integer;

begin

writeln('Elementele matricii');

write('n:');

readln(n);

for i:=1 to n do

     for j:=1 to n do begin

               write('m[',i,j,']=');

               readln(m[i,j]);

                   end;

writeln('Suma fiecarui rand');

s:=0;

for i:=1 to n  do   begin

     s:=0;

     for j:=1 to n do

             s:=s+m[i,j];

     writeln(s);

                           end;

readln;  

end.

Vă mulțumim pentru vizita pe site-ul nostru dedicat Informatică. Sperăm că informațiile prezentate v-au fost utile. Dacă aveți întrebări sau aveți nevoie de suport suplimentar, nu ezitați să ne contactați. Ne bucurăm să vă revedem și vă invităm să ne adăugați în lista de favorite!


Ze Schools: Alte intrebari