Program n1;
const n=15;
var a: array[1..n] of integer;
i,k5,kns,sum: integer;
sb: real;
begin
randomize;
k5:=0;
kns:=0;
sum:=0;
write('оценки: ');
for i:=1 to n do
begin
a[i]:=random(4)+2;
write(a[i],' ');
if a[i]=5 then k5:=k5+1;
sum:=sum+a[i];
end;
writeln;
sb:=sum/n;
writeln('кол-во 5: ',k5);
writeln('ср арифм: ',sb);
for i:=1 to n do if a[i]>sb then kns:=kns+1;
writeln('кол-во уч >ср арифм: ',kns);
end.
Ответ:
12
Объяснение:
Элементарная арифметика 36/6 = 6 , а 6+6 = 12
я это делала в школе с классом!
Ответ:
var n,i,a,s,k:Integer;
begin
Write('Введите количество чисел ');
Readln(n);
for i:=1 to n do
begin
Write('Введите целое число ');
Readln(a);
if a mod 2 = 0 then
begin
s:=s+a;
k:=k+1
end
end;
Write('Среднее арифметическое чётных чисел равно ',s/k)
end.
Объяснение:
n - количество целых чисел, которые будут вводиться
i - счётчик цикла
a - вводимое целое число
s - сумма чётных чисел
k - количество чётных чисел
Помой полы
1) убери все вещи с пола,
2) отряхни коврики
3) подмети пол
4) вымой пол
5) мой от угла к выходу
6) помой тряпку под струей воды
7) положи все на место