Для free pascal. дана матрица размером n*m. найти седловую точку матрицы и напечатать ее индексы. седловой точкой называется элемент, имеющий наименьшее значение в строке и наибольшее в столбце каждый элемент матрицы должен быть введён вручную

126

374

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

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

Denhuk

Информатика

4,6(22 оценок)

Const n = 3; m = 4; var a: array[1..n,1..m] of integer; i,j,min,max: integer; begin writeln('введите матрицу a[',n,',',m,']: '); for i: = 1 to n do for j: = 1 to m do read(a[i,j]); writeln; for i: = 1 to n do begin min: =1; for j: = 2 to m do if a[i,min]> a[i,j] then min: =j; max: =1; for j: = 2 to n do if a[max,min]< a[j,min] then max: =j; if max=i then writeln('a[',i,',',min,'] = ',a[i,min]) end; end. пример: введите матрицу a[3,4]: 4 3 6 -4 2 -3 -9 -5 2 4 -6 -9 a[1,4] = -4

ilona125

Информатика

4,6(16 оценок)

можно обойтись без массива:

program meredith; var n,i,a,b,v,a1,a2,temp: integer; begin writeln('* alphaues is *'); write('ok, введите число n ='); readln(n); a: =0; for i: =1 to n do begin write('введите ',i,'-e число '); readln(temp); if i mod 2 = 1 then a : = a + temp else a : = a - temp; if i = 1 then a1 : = temp; if i = 2 then a2 : = temp; end; writeln(' а: ',a); writeln(' б: ',a1+temp); writeln(' в: ',a1-a2); writeln('*******************************'); end.

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

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

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

Популярно: Информатика

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

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

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

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

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

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