Информатика: Що спільного між машиним і лбдскім інтелектом

en228

16.04.2022 02:43

Информатика

Есть ответ 👍

Що спільного між машиним і лбдскім інтелектом

217

449

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

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

Frosterion

Информатика

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

Const k=5; type massiv = array [1..k,1..k] of integer; var mass: massiv; summa,i,j: integer; begin randomize; summa: =0; for i: =1 to k do for j: =1 to k do mass[i,j]: =random(10); for i: =1 to k do begin for j: =1 to k do begin write (mass[i,j], ' || '); end; writeln; end; for i: =1 to k do for j: =1 to k do if (i=j) then summa: =summa+mass[i][j]; writeln; writeln ('сумма главной диагонали равна ', summa); end. примечание: так как у меня отсутствует модуль crt то вывести в графическую дос оболочку я вам программу не могу но если сильно хочется то в начале добавляете uses crt, а после первого begin добавляете clrscr uses crt; {только при начилии соединения с модулем crt запуск обычно по shift+f9} const k=5; {зарезервировал постоянное число} type massiv = array [1..k,1..k] of integer; {задал массив} var mass: massiv; summa,i,j: integer; begin clrscr; {очистка экрана} randomize; summa: =0; for i: =1 to k do {запустил цикл, одномерный массив} for j: =1 to k do mass[i,j]: =random(10); {числа не больше 10} for i: =1 to k do begin {запускаю цикл} for j: =1 to k do begin write (mass[i,j], ' || '); end; writeln; end; for i: =1 to k do {вывел квадратичную матрицу, 2-мерный массив} for j: =1 to k do if (i=j) then {, работаю по главной диагонали} summa: =summa+mass[i][j]; {суммирую} writeln; writeln ('сумма главной диагонали равна ', summa); {вывожу} end.

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

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

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

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

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

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

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

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

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

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