100 , . информатика, паскаль решить две . 1) дан двумерный массив размером 66. поменять 1 столбец с 6, 2 столбец с 5, 3 столбец с 4. 2) дан двумерный массив размером 66. поменять 1 строку с 1 столбцом, 2 строку со 2 столбцом, 3 строку с 3 столбцом, 4 строку с 4 столбцом, 5 строку с 5 столбцом, 6 строку с 6 столбцом.

273

395

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

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

оки8

Информатика

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

1) var i, j: integer; ar: array[1..6, 1..6]of integer; begin for i : = 1 to 6 do for j : = 1 to 6 do read(ar[i, j]); writeln; for i : = 1 to 6 do swap(ar[i, 1], ar[i, 6]); for i : = 1 to 6 do swap(ar[i, 2], ar[i, 5]); for i : = 1 to 6 do swap(ar[i, 3], ar[i, 4]); for i : = 1 to 6 do begin for j : = 1 to 6 do write(ar[i, j], ' '); writeln; end; end. 2) var mr, rm: array [1..6, 1..6] of integer; i, j: integer; begin for i : = 1 to 6 do for j : = 1 to 6 do read(mr[i, j] ); for i : = 1 to 6 do for j : = 1 to 6 do rm[i, j] : = mr[j, i]; writeln; for i : = 1 to 6 do begin for j : = 1 to 6 do write(rm[i, j],' '); writeln; end; readln; end.

viahseslav

Информатика

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

{1} const n = 6; var a: array[1..n,1..n] of integer; i,j: integer; t: integer; begin for i : = 1 to n do for j : = 1 to n do read(a[i,j]); for j : = 1 to n div 2 do for i : = 1 to n do begin t : = a[i,j]; a[i,j] : = a[i,n+1-j]; a[i,n+1-j] : = t; end; for i : = 1 to n do begin writeln; for j : = 1 to n do write(a[i,j],' '); end end. {2} const n = 6; var a: array[1..n,1..n] of integer; i,j: integer; t: integer; begin for i : = 1 to n do for j : = 1 to n do read(a[i,j]); for i : = 1 to n do for j : = i+1 to n do begin t : = a[i,j]; a[i,j] : = a[j,i]; a[j,i] : = t; end; for i : = 1 to n do begin writeln; for j : = 1 to n do write(a[i,j],' '); end end.

nata1116

Информатика

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

Var v1,v2,s,t: longint; begin readln(s,t,v1,v2); writeln(abs(s-(v1*t+v2*; end. abs-модуль

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

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

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

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

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

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

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

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

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

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