Допишите программу: -поменяйте местами первый и последний столбики;
Вот программа:
Program JHK;
const n=5;
var ns,a:real;j,p,i,pr,nm:integer;d:array[1..n,1..n]of real; m:array[1..n] of real;
begin
for i:=1 to 5 do
begin
for j:=1 to 5 do
begin
d[i,j]:=sin(i+j);
write(d[i,j]:6:2);
end;
writeln;
end;
Вот программа:
Program JHK;
const n=5;
var ns,a:real;j,p,i,pr,nm:integer;d:array[1..n,1..n]of real; m:array[1..n] of real;
begin
for i:=1 to 5 do
begin
for j:=1 to 5 do
begin
d[i,j]:=sin(i+j);
write(d[i,j]:6:2);
end;
writeln;
end;