Ответы на вопрос:
решение
pascal
выделить код
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
const
n = 15; {массив из 15 элементов, можно менять}
var
a : array [1..n] of integer;
i, k, ko, _a : integer;
s : real;
begin
s : = 0;
k : = 0;
ko : = 0;
{заполняем и выводим массив, считаем сумму элементов}
writeln('массив: ');
randomize;
write('введите a: ');
readln(_a);
for i : = 1 to n do
begin
a[i] : = random(100) - 50; {создаем i-ый }
write(a[i], ' '); { }
{если отрицательный суммируем, считаем кол-во}
if a[i] < 0 then
begin
s : = s + a[i];
inc(ko)
end;
{если > a и на четном месте количество +1}
if (a[i] > _a) and (i mod 2 = 0) then inc(k)
end;
writeln; {строку перевели}
writeln('среднее арифметическое отрицательных: ', (s/ko): 0: 6);
writeln('кол-во больших a на нечетных местах: ', k)
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Математика
-
darikesa6922.11.2022 02:25
-
tiMYPkomptik09.04.2022 05:33
-
vlada04110412.03.2021 22:25
-
rasgramorysergio577503.04.2020 23:40
-
vlada36312.06.2021 13:04
-
nshtvr22.08.2022 21:54
-
zadoroznaa200129.07.2020 23:30
-
M8922669113005.02.2023 17:20
-
xrot08.10.2020 08:30
-
adekvat303.02.2022 12:49
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.