Решить не могу по информатике: 1. составьте программу ввода элементов массива h [1..8] с клавиатуры и вывода на экран элементов с отрицательными значениями. 2.составьте программу, которая заполняет массив h [1..10] случайными целыми числами в диапазоне от -10 до 10 и находит количество элементов с отрицательными значениями. 3. составьте программу, которая заполняет массив h [1..10] случайными целыми числами в диапазоне от 1 до 10 и находит произведение элементов с нечётными значениями и количество элементов с нечётными значениями. 5. составьте программу, которая заполняет массив h [1..20] случайными целыми числами в диапазоне от 1 до 20 и находит среднее арифметическое элементов кратных трём и чётными индексами.
276
317
Ответы на вопрос:
1)var h: array[1..8]of integer; i: integer; begin write('massiv'); for i: =1 to 8 do read(h[i]); writeln; write('elementi s otric znach'); for i: =1 to 8 do if h[i]< 0 then write(h[i],' '); end.2)var h: array[1..10]of integer; i,k: integer; begin write('massiv: '); for i: =1 to 10 do begin h[i]: =random(21)-10; write(h[i],' '); end; writeln; for i: =1 to 10 do if h[i]< 0 then k: =k+1; write('kol-vo elem s otric znach: ',k); end.3)var h: array[1..10]of integer; i,k,p: integer; begin write('massiv: '); for i: =1 to 10 do begin h[i]: =random(10)+1; write(h[i],' '); end; writeln; p: =1; for i: =1 to 10 do if h[i] mod 2=1 then begin k: =k+1; p: =p*h[i]; end; write('kol-vo elem s nechet znach: ',k,' proizvedenie: ',p); end.5)var h: array[1..20]of integer; i,k,s: integer; a: real; begin write('massiv: '); for i: =1 to 10 do begin h[i]: =random(20)+1; write(h[i],' '); end; writeln; for i: =1 to 10 do if (h[i] mod 3=0)and(i mod 2=0) then begin k: =k+1; s: =s+h[i]; end; a: =s/k; write('srednee arifmet: ',a); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
vika05lida81128.12.2020 11:45
-
ledzep28.02.2022 09:47
-
Деп56727.09.2020 07:54
-
Машуля179002.02.2023 19:47
-
puzzle28902.05.2023 17:24
-
КатяСвиридова14.10.2021 13:47
-
07052003108.10.2021 18:50
-
nikola5817.07.2021 12:39
-
лиза123456789101112128.03.2021 18:31
-
sofira318.03.2021 18:08
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.