Program n1;
const n=10;
var a: array[1..n] of integer;
i,k,sum: integer;
begin
randomize;
sum:=0;
k:=0;
for i:=1 to n do
begin
a[i]:=random(21);
sum:=sum+a[i];
end;
for i:=1 to n do if a[i] > sum/n then k:=k+1;
writeln(k);
end.
Порядок переливания краски ( по шагово ) :
шаг перелива - 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8
ведро (12 л) - 12 4 4 9 9 1 1 6
банка (5 л) - 0 0 5 0 3 3 5 0
ведро (8 л) - 0 8 3 3 0 8 6 6
Запишем все возможные старты
10:15 10:10 10:20 10:05
финиш (в правильном порядке)
10:45 10:25 10:28 10:46
места 4 1 2 3
стоит отметить, что хоть 4 место пришло раньше, все равно последнее значит, что но начал не больше чем -2 минуты, чем 3 (х3=х4+(2,3,4...)
подходит 2ой и 4ый вариант, дальше можно просто быстро посчитать.
общее время для 2ого варианта (40, 15, 13, 26) не сходится т.к. 15 > 13, а должно быть меньше ибо 1 место.
Значит номер 4, проверяем (30, 15, 23, 26) сходится.
Правильный тот, что самый нижний
25*80=2000 символов на экране
юникод 16 битный:
2000*16=32000бит(или 4000 байт)