Ответы на вопрос:
// pascalabc.net 3.1, сборка 1200 от 13.03.2016 begin var a: =matrixrandom(7,7,0,9); var k: =0; for var i: =0 to 6 do begin for var j: =0 to 6 do begin write(a[i,j]: 3); if a[i,j] in [1..5] then inc(k) end; writeln end; writeln('кол-во элементов на [1,5]: ',k) end. тестовое решение: 2 1 7 3 3 2 7 9 2 9 2 0 5 5 4 2 6 9 4 6 0 1 0 3 5 4 5 9 6 3 6 0 2 0 8 0 8 4 3 2 1 8 6 0 4 4 5 4 0 кол-во элементов на [1,5]: 27 вариант "совсем для школы" const n=7; var a: array[1..n,1..n] of integer; i,j,k: integer; begin randomize; k: =0; for i: =1 to n do begin for j: =1 to n do begin a[i,j]: =random(10); write(a[i,j]: 3); if a[i,j] in [1..5] then inc(k) end; writeln end; writeln('кол-во элементов на [1,5]: ',k) end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
katherinepierce186412.05.2021 06:38
-
roseflover200518.04.2022 02:45
-
Medina2016110223.01.2023 02:51
-
Shkaf219.10.2021 03:19
-
manafin101.10.2020 08:41
-
Moneyyyyyy29.09.2020 22:21
-
Karakatica4416.06.2022 02:36
-
anastasiyachevh11.05.2021 10:30
-
priutkorel19.04.2022 17:01
-
BlackBear251705.02.2021 11:34
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.