Ответы на вопрос:
//pascal abc.net v3.1 сборка 1172 var ar: array[1..15] of integer; i,k1,k2: integer; r1,r2: real; begin randomize; writeln('array: '); for i: =1 to 15 do begin ar[i]: =random(-20,20); write(ar[i]: 4); if i mod 2=0 then begin inc(k1); r1: =r1+ar[i]; end; if ar[i]> 0 then begin inc(k2); r2: =r2+k2; end; end; r1: =r1/k1; r2: =r2/k2; writeln; if r1> r2 then writeln('среднее арифметическое элементов стоящих на четных местах'); if r1< r2 then writeln('cреднее арифметическое положительных элементов массива'); if r1=r2 then writeln('равно'); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Лоликус03.02.2020 10:07
-
erkenova090927.02.2023 20:54
-
Murad1111111112.07.2020 12:12
-
ruslansuxenco316.09.2020 21:04
-
peschanskaakris04.05.2020 16:31
-
Ferdgi06.12.2020 07:20
-
dianakokorina9111.03.2021 18:50
-
s1mple7201.06.2020 22:12
-
grinanovatana203.06.2022 06:57
-
RedSakura29.08.2020 19:11
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.