const d = 31;
var
a: array[1..d] of integer;
i, count, mdl: integer;
begin
for i := 1 to d do begin
a[i] := random(31);
write(a[i], ' ');
mdl := mdl + a[i];
end;
writeln;
writeln('Средняя температура: ', (mdl / d):0:2);
for i := 1 to d do
if(a[i] > mdl / d) then inc(count);
writeln('Дни, в которые температура была выше средней: ', count);
end.
S, a - должны быть целочисленными, а не вещественными.
1)
a. 6-ая система счисления (далее СС)
b.4-ая СС
c.5-ая СС
2)
a.<
b.<
c.? (какая СС у числа справа?)
3)
10; 11; 12; 20; 21; 22; 100; 101; 102; 110; 111; 112; 120; 121; 122; 200
4)
b) Число не может быть больше СС
d) Число не может быть больше СС (в данном случае 8>7)
f) число должно выглядеть так 1000