Написать программу: 1) сформировать массив из 18 целых случайных чисел из [-35; 35], вывести исходный массив в строку; 2) найти среднее арифметическое всех четных элементов массива; 3) найти сумму неотрицательных элементов; 4) заменить числом 5 элементы, стоящие на четных местах, и числом 0 - элементы, стоящие на нечетных местах, вывести в строку получившийся массив.
186
356
Ответы на вопрос:
Program t1; const j = 18 var n,j, i, s,s1: integer; mas: array [1..j] of integer; begin randomize; writeln ('сгенерированный масив: '); for i : = 1 to j do begin mas[i] : = random (70) - 35; write (mas[i]); end; s: = 0; s1: =0; for i : = 1 to j do begin if (i mod 2 =0) then s : = s+mas[i]; //сумма четных элементов if (mas[i] > = 0) then s1 : = s1 + mas[i]; //сумма неотрицательных элементов end; writeln ('среднее арифметическое четных элементов: ', s/18); writeln ('сумма неотрицательных элементов: ', s1); writeln ('массив после замены элементов: '); for i : = 1 to j do begin if (i mod 2 =0) then mas[i] : = 5 else mas[i] : = 0; write (mas[i]); end; end; end.
Program xax; var i: shortint; a,b: array [-10..10] of byte; begin randomize; for i: =-10 to 10 do begin a[i]: =random(100); write(a[i],' '); end; writeln; for i: =-10 to -1 do b[i]: =a[-11-i]; for i: =1 to 10 do b[i]: =a[11-i]; b[0]: =a[0]; for i: =-10 to 10 do write(b[i],' '); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
linasokol0306.12.2020 22:44
-
kirilenkok115.05.2022 17:16
-
arinaohtova29.05.2021 05:13
-
cat159753jjyfvb04.11.2020 01:25
-
sedoidenis200024.06.2022 03:18
-
anaStasyaplus22.09.2021 07:14
-
Anatoliy111111104.07.2020 12:16
-
EvaSwansea1225.06.2023 09:46
-
Alina349401.07.2022 12:23
-
камиииии7666666666610.08.2020 17:38
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.