
Вопрос задан 29.12.2018 в 10:06.
Предмет Информатика.
Спрашивает Матюха Владислава.
Очень нужна помощь!!!Написать программу в КуМире,которая меняет главную и побочную диагональ
матрицы размером 3х3.

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

Отвечает Козырева Эльвира.
Программу написал HRAshton. Я немного изменил
алг
нач
целтаб арр[1:3, 1:3]
цел к, п, ш
нц для ш от 1 до 3
нц для к от 1 до 3
арр[ш, к] := int(rnd(900)+100)
вывод арр[ш, к], ' '
кц
вывод нс
кц
нц для ш от 1 до 3
если ш<>2
то
п := арр[ш, 1]
арр[ш, 1] := арр[ш, 3]
арр[ш, 3] := п
все
кц
вывод нс, нс
нц для ш от 1 до 3
нц для к от 1 до 3
вывод арр[ш, к], ' '
кц
вывод нс
кц
кон
алг
нач
целтаб арр[1:3, 1:3]
цел к, п, ш
нц для ш от 1 до 3
нц для к от 1 до 3
арр[ш, к] := int(rnd(900)+100)
вывод арр[ш, к], ' '
кц
вывод нс
кц
нц для ш от 1 до 3
если ш<>2
то
п := арр[ш, 1]
арр[ш, 1] := арр[ш, 3]
арр[ш, 3] := п
все
кц
вывод нс, нс
нц для ш от 1 до 3
нц для к от 1 до 3
вывод арр[ш, к], ' '
кц
вывод нс
кц
кон



Отвечает Кивель Никита.
//////////////////////////////////


Топ вопросов за вчера в категории Информатика

Информатика 565

Информатика 25

Информатика 22

Информатика 27

Информатика 34

Информатика 58

Информатика 63

Информатика 23
Последние заданные вопросы в категории Информатика
Предметы
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili