Var i,sum: Integer;
a:array[1..10] of Integer;
begin
sum:=0;
Randomize();
for i:=1 to 10 do
begin
a[i]:=random(20);
if(a[i]<15) then sum:=sum +a[i];
write(' ',a[i]);
end;
writeln();
writeln('сумма элементов < 15= ',sum);
end.
Первая гиря - 1 кг, это достаточно очевидно.
Вторая гиря - 3 кг, с её помощью можно получить следующие веса:
2 кг = 3 кг - 1 кг (на одну чашу ставим 3 кг, на вторую 1 кг плюс товар)
3 кг = 3 кг
4 кг = 3 кг + 1 кг
Дальше нам нужно 9 кг:
5 кг = 9 кг - 3 кг - 1 кг
6 кг = 9 кг - 3 кг
7 кг = 9 кг + 1 кг - 3 кг
... ... ...
13 кг = 9 кг + 3 кг + 1 кг
Последняя гиря - это 27 кг (чтобы в сумме получалось 40 кг).
Ответ: 1, 3, 9, 27.
Этика - наука, изучающая нормы поведения между человека в обществе
нажимай на любые синие квадратики или поставь все квадраты ровно!