Ответ:<span>
</span>f16(16)<span> + </span>7(16)<span> = </span>f1d(<span>16)
</span>f1d(16) + 3(16) = f20(<span>16)</span>
Program Matrix;
Uses Crt;
type matrix=array[1..3,1..3] of real;
var m:matrix;
procedure PrintMatrix(mas:matrix);
var j,k:integer;
begin
for k:=1 to 3 do
begin
for j:=1 to 3 do
begin
write(mas[k,j]:7:2);
end;
writeln;
end;
end;
procedure Auto;
var i,j:integer;
begin
randomize;
for i:=1 to 3 do
begin
for j:=1 to 3 do
begin
m[i,j]:=25+random(21)+i;
end;
end;
end;
begin
clrscr;
Auto;
PrintMatrix(m);
readkey;
end;
Странный вопрос.
Плюс нижней что бумага не торчит и не мешает, минус, что загрузка бумаги туда занимает больше времени.