Задана квадратная матрица. Переставить строку с максимальным элементом на главной диагонали со строкой с заданным номером m. (программа Паскаль)

181

377

Посмотреть ответы 2

Ответы на вопрос:

kubajoleksandra

Другие предметы

4,5(5 оценок)

program lab5_dvum_mass_var8;
const n=5; m=5;
type ar=array[1..n,1..m] of integer;
type br=array[1..n] of integer;
var i,z,t,j,nm,imax,jmax,max:integer; a:ar;

procedure vvod(var a:ar);
var i,j:integer;
begin
  for i:=1 to n do
    for j:=1 to m do
    a[i,j]:=random(51);
end;

procedure vivod(a:ar);
var i,j:integer;
begin
  for i:=1 to n do
   begin
    for j:=1 to m do
    write(a[i,j]:5);
    writeln;
    end;
end;

begin
vvod(a);
vivod(a);
begin
max:=0;
for i:=1 to n do
  for j:=1 to m do
  if i=j then
   begin
    if a[i,j]>max then
    begin
     max:=a[i,j]; imax:=i; jmax:=j;
     end;
     end;
     end;
    writeln('element,' ',max:2,' ','ryadok',imax:2,' ',stolbec',jmax:2);
    Repeat
write('vvedite nomer ryadka: ');readln(nm);
Until nm in [1..n];
For j:=1 to m do
Begin
   t:=A[nm,j];
   A[nm,j]:=A[imax,j];
   A[imax,j]:=t;
End;
writeln('preobrazovannaya matrica');
vivod(a);
writeln;
end.

REDFRAG

Другие предметы

4,5(10 оценок)

Когда я в детстве грыз ногти, мне мама купила специальный лак который имел нереальный горький вкус. И я перестал их грызть.

А ещё можно себе говорить каждый раз когда грызеш ногти, что у тебя будут глисты )

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Другие предметы

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.