решение
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.
ученики средних школ 5-6 часов сидят на уроке и учатся. им нужно немного разминаться и давать мозгу отдохнуть. поэтому существует урок как культура. на физкультуре дети бегают, прыгают, и соревнуются между собой. чтобы избежать различных травм, как например можно упасть с турника или споткнуться при беге, следует соблюдать некоторые правила. нельзя уходить далеко от учителя физкультуры, нельзя толкаться во время бега и быть внимательным. тогда физкультура будет приносить только пользу вашему здоровью.
Поделитесь своими знаниями, ответьте на вопрос:
Составить .всего 4 бочки.в одной бочке 26 л. в трёх неизвестно.