?!!?!? есть ещё в таблице 5.вывод информации на экран D.end и 6.целый тип E.var
113
220
Ответы на вопрос:
Const nx=20; var i,j,n,s: integer; a,b: array[1..nx,1..nx] of real; min,t: real; z: array[1..nx] of real; begin min: =100; write('введите размер матрицы n'); readln(n); for i: =1 to n do begin for j: =1 to n do begin a[i,j]: = sin(j)*(1-sin(i)); write(a[i,j]: 9: 4); if min > a[i,j] then begin min: = a[i,j]; s: =i; end; end; writeln; end; writeln; i: =s; for j: =1 to n do begin z[j]: =a[i,j]; write(z[j]: 9: 4); end; for i: =1 to n do begin for j: =2 to n do begin if z[j-1]> z[j] then begin t: =z[j-1]; z[j-1]: =z[j]; z[j]: =t end; end; end; writeln; i: =s; for j: =1 to n do begin a[i,j]: =z[j]; write(z[j]: 9: 4); end; writeln; writeln; for i: =1 to n do begin for j: =1 to n do begin b[i,j]: = a[i,j]; write(b[i,j]: 9: 4); end; writeln; end; writeln; write('min = ',min: 9: 4, ' i = ', s); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Karina071426.02.2020 02:02
-
154Dance325.05.2022 01:28
-
Adelinchik230921.04.2020 08:01
-
Soldat09804.02.2020 21:35
-
missasha0411.01.2020 23:16
-
boss11031.10.2021 21:45
-
momreomgr21.10.2020 01:10
-
Alina2525521.06.2022 17:49
-
safievd6Димас25.10.2021 16:57
-
ZnayNeZnay05.10.2021 01:26
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.