Разработка в среде Turbo Pasсal программы преобразования матрицы
13
end;
for i:=1 to n do
if x[i]<min then
begin
imin:=i;
min:=x[i];
end;
y:=max-min;
Вывод результатов
Результат выводится в цикле с параметром с помощью оператора печати write. При выводе элементов целочисленного типа используют форматированный вывод, т.е. указывается количество позиций под целую и десятичную часть соответственно.
for i:=1 to n do
begin
for j:=1 to n do
write(a[i,j]:7:1);
writeln;
end;