Основы применения вычислительной техники и программирование. Беспалов В.В. - 54 стр.

UptoLike

Составители: 

writeln;
end;
for i:=1 to 5 do
begin
s:=b[i,1]; b[i,1]:=b[i,5]; b[i,5]:=s;
end;
writeln;
writeln(‘Изменённая матрица’);
writeln;
for i:=1 to 5 do
begin
for j:=1 to 5 do
write(b[i,j]:4);
writeln;
end;
end.
55