Написать программу - в двумерном массиве заменить нулями элементы главной диагонали (главная диагональ идет из левого верхнего угла в правый нижний).с выводом исходной и полученной матриц.

186

371

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

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

Evgenchee

Информатика

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

Const n = 10; var a: array[1..n, 1..n] of integer; i, j: integer; begin randomize; writeln('исходная матрица'); for i : = 1 to n do begin for j : = 1 to n do begin a[i, j] : = random(101) - 50; write(a[i, j]: 4) end; writeln end; for i: =1 to n do a[i,i]: =0; writeln('результирующая матрица'); for i : = 1 to n do begin for j : = 1 to n do write(a[i, j]: 4); writeln end end. тестовое решение: исходная матрица -19 15 42 44 32 41 -11 -21 14 -29 33 -8 -21 -33 -38 28 21 43 39 -46 -1 33 13 23 -38 32 -25 -26 43 41 7 6 39 14 48 37 -3 -3 -2 -41 -26 40 -38 -24 16 43 -17 3 7 7 37 20 17 44 28 -2 -49 -32 32 -50 16 -35 -14 23 14 -23 3 15 -31 -24 -19 -26 -5 30 30 9 20 -13 -43 -30 -2 22 17 -15 -46 38 39 46 37 -1 36 -22 15 -2 -7 -41 3 -10 12 -12 результирующая матрица 0 15 42 44 32 41 -11 -21 14 -29 33 0 -21 -33 -38 28 21 43 39 -46 -1 33 0 23 -38 32 -25 -26 43 41 7 6 39 0 48 37 -3 -3 -2 -41 -26 40 -38 -24 0 43 -17 3 7 7 37 20 17 44 28 0 -49 -32 32 -50 16 -35 -14 23 14 -23 0 15 -31 -24 -19 -26 -5 30 30 9 20 0 -43 -30 -2 22 17 -15 -46 38 39 46 0 -1 36 -22 15 -2 -7 -41 3 -10 12 0

Саша20041509

Информатика

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

Впаскале const n = 3; k = 3; var i,j: integer; a: array[1..n,1..k] of integer; begin for i: =1 to n do for j: =1 to k do begin writeln('введите a[',i,',',j,']: '); readln(a[i,j]); end; writeln('исходный массив: '); for i: =1 to n do begin for j: =1 to k do write('a[': 4,i,',',j,']=',a[i,j]); writeln; end; for i: =1 to n do for j: =1 to k do if i=j then a[i,j]: =0; writeln('полученный массив: '); for i: =1 to n do begin for j: =1 to k do write('a[': 4,i,',',j,']=',a[i,j]); writeln; end; end.

khfozilzhonov

Информатика

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

9600 бит= 1200 байт. субботник весит 1536 кбайт. 1536/1.2=1280 секунд.

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

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

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

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

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

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

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

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

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

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