Заполнить массив из 10 элементов случайными числами из диапазона от -5 до 5. (паскаль)
122
407
Ответы на вопрос:
1)вариант: begin var ar: =arrrandom(10, -5, 5); //ar.println; end. 2)вариант: var ar: array[1..10]of integer; begin for var i : = 1 to 10 do ar[i] : = random(-5, 5); //for var i : = 1 to 10 do write(ar[i],' '); end.
Data 101,98,100,108,97,106,99,100,112,96,107,98 dim a(1 to 12) as integer dim b(1 to 12) as integer, c(1 to 12) as integer dim i as integer, ib as integer, ic as integer cls ib = 0: ic = 0 for i = 1 to 12 read a(i) select case a(i) case 100 ib = ib + 1 b(ib) = i case is > 100 ic = ic + 1 c(ic) = i end select next i print "план (100%) в месяцах: "; for i = 1 to ib print b(i); next i print print "перевыполнение плана в месяцах "; for i = 1 to ic print c(i); next i end результат выполнения программы: план (100%) в месяцах: 3 8 перевыполнение плана в месяцах 1 4 6 9 11
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Арабика131.01.2021 10:46
-
Люда000117.08.2022 21:15
-
pat0545317.04.2020 02:58
-
эми4603.02.2022 15:18
-
Sofia2009123.08.2020 10:05
-
илья196712.04.2022 23:41
-
elena40727.07.2020 06:03
-
Алисика1128.01.2022 22:26
-
keksikgovad18.12.2020 07:24
-
89195188243aMils05.06.2021 07:57
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.