Дана матрица размером 3*4. Найти сумму элементов матрицы. В паскале. Обязательно использовать функцию или процедуру

Ответы

Ответ дал: Gleb1Kosyrev
0
var c:integer;

procedure generate(var c:integer);
var ar:array[1..3,1..4] of integer;
a,b:integer;
begin;
for a:=1 to 3 do
begin;
writeln;
for b:=1 to 4 do
begin;
ar[a,b]:=random(10);
c+=ar[a,b];
write(ar[a,b]:4);
end;
end;
end;

begin;
randomize;
writeln('Matrix:');
generate(c);
writeln;
writeln('Result',c);
end.
Ответ дал: vladiksan98
0
а функия или процедура где? они просто обязательно нужны
Ответ дал: Gleb1Kosyrev
0
Глупое и ничем не обоснованное требование, но я поправил.
Ответ дал: vladiksan98
0
просто не принимают работу без процедур
Вас заинтересует