Самостоятельная работа по информатики на скрин все есть вопрос жизни

295

307

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

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

Виктория80805

Информатика

4,8(23 оценок)

я вообще не понила вопрос можно точнее

krubl

Информатика

4,7(17 оценок)

обе програмки проверены на авс паскале. работают : )

program user6165_1; const n=10; var a: array[1..n,1..n] of integer; stosum: array[1..n] of integer; //массив для хранения сумм столбцов i,j,nomer,sum : integer; begin randomize; for i: =1 to n do for j: =1 to n do a[i,j]: = random(100); //заполняем массив writeln('*** alphaues is ***'); for j: =1 to n do begin sum: =0; for i: =1 to n do sum: =sum+a[i,j]; // находим сумму столбца stosum[j]: =sum; end; nomer: =1; sum: =stosum[1]; for j: =1 to n do begin if sum< stosum[j] then sum: =stosum[j]; nomer: =j; end; writeln; for i: =1 to n do begin for j: =1 to n do write(a[i,j]: 5); //выводим массив writeln; end; writeln('*** столбец с максимальной суммой - ',nomer,'-й'); end.program user6165_2; const n=10; var a: array[1..n,1..n] of integer; stosum: array[1..n] of integer; //массив для хранения сумм столбцов i,j,nomer,min : integer; begin randomize; for i: =1 to n do for j: =1 to n do a[i,j]: = random(100); //заполняем массив writeln('*** alphaues is ***'); writeln; for i: =1 to n do begin for j: =1 to n do write(a[i,j]: 5); //выводим массив writeln; end; for i: =1 to n do begin min: =a[i,1]; nomer: =1; for j: =1 to n do if min> a[i,j] then begin min: =a[i,j]; nomer: =j; end; if nomer< n then begin a[i,nomer+1]: =1; writeln(i,'-я строка: мин. элемент - ',nomer,'-й. следующий заменён на 1.'); end else writeln(i,'-я строка: мин. элемент - ',nomer,'-й. это последний элемент в строке.'); end; end.

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

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

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

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

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

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

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

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

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

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