Для Pascal ABC
uses GraphABC;
begin
Window.Title := 'Apple';
var y,y0,x,t: integer;
Brush.Color := clGreen;
y0:=70;
x:=70;
LockDrawing;
for t := 0 to 8 do
begin
y:=y0+5*t*t;
Window.Clear(clWhite);
Circle(x,y,50);
Redraw;
Sleep(100);
end;
end.
Набрать 3 литровый баллон, перелить в 5 литровый,(там останется место для 2 литров), опять набрать 3 литровый баллон и перелить из него 2 литра в 5 литровый. (В 3 литровом баллоне останется 1 литр)
65(8)=53(10)< 53(7)=38(10)
Вообщем все просто.
Берешь исходное число 8310.
и делаешь следующее.
8310 / 2 = 4155, остаток 0
4155 / 2 = 2077, остаток 1
2077 / 2 = 1038, остаток 1
1038 / 2 = 519, остаток 0
519 / 2 = 259, остаток 1
259 / 2 = 129, остаток 1
129 / 2 = 64, остаток 1
64 / 2 = 32, остаток 0
32 / 2 = 16, остаток 0
16 / 2 = 8, остаток 0
8 / 2 = 4, остаток 0
4 / 2 = 2, остаток 0
2 / 2 = 1, остаток 0
1 / 2 = 0, остаток 1
И твое число в двоичной система будет снизу вверх из чисел остатка, а то есть 10000001110110
Для начала посчитаем сколько всего времени мальчик затратил на перекладывание рыбок в банку 40*2=80, затем посчитаем сколько он затратил времени, чтобы поймать рыбок 40*5*5%=210 всего 290/60=4,8мин
таблица в excel
А1 количество рыб В1 время на улов С1 время на перекладывание D1 общее время
A2-A41 ПРОСТО ПРОСТАВЬ ЦИФРЫ B2 вставь функцию =СУММ(B2;5*5%) и протяни до значения В42 и так далее