Определить является ли данная квадратная матрица а(5,5) магическим квадратом (т.е одинаковы ли суммы чисел во всех строках, столбцах и диагоналях). в delphi.

199

300

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

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

dymovvla01928

Информатика

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

Program abc; const a: array [1..5] of array [1..5] of integer = ((1, 15, 24, 8, ,18,2,11,,21,10,19,,4,13,22,,7,16,5,14)); var i, j, x: integer; arr: array [1..12] of integer; begin for i : = 1 to 5 do begin x : = 0; for j : = 1 to 5 do x : = x + a[i][j]; arr[i] : = x; end; for i : = 1 to 5 do begin x : = 0; for j : = 1 to 5 do begin x : = x + a[j][i]; end; arr[5+i] : = x; end; x : = 0; for i : = 1 to 5 do begin x : = x + a[i][i]; end; arr[11] : = x; x : = 0; for i : = 1 to 5 do begin x : = x + a[i][6 - i]; end; arr[12] : = x; for i : = 1 to 12 do begin if arr[i] < > x then begin writeln('не магический'); break; end; if i = 12 then writeln('магический.'); end; end.

Kira1574

Информатика

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

Создадим таблицу из 8 ячеек по числу машин и в каждой будем хранить номер дороги, на которой находится машина. для кодирования номера дороги понадобится 4 бита (2^4=16) и всего машин 8 итого - 4*8 = 32 бита

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

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

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

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

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

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

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

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

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

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