Помогите, пожалуйста!!! В двумерном массиве 3:4 найти сумму цифр второй строки. СРОЧНО!!!
Answers & Comments
elenaklon
Var a:array [1..3,1..4] of integer; i,j,s:integer; begin for i:=1 to 3 do begin for j:=1 to 4 do begin a[i,j]:=random(10); write (a[i,j]:3) end; writeln end; for j:=1 to 4 do s:=s+a[2,j]; writeln (s) end.
Answers & Comments
i,j,s:integer;
begin
for i:=1 to 3 do
begin
for j:=1 to 4 do
begin
a[i,j]:=random(10);
write (a[i,j]:3)
end;
writeln
end;
for j:=1 to 4 do s:=s+a[2,j];
writeln (s)
end.