var a,i: integer;
begin
a:=1;
for i:=1 to 24 div 3 do
a:=a*2;
writeln(3*i,' - ',a);
end;
end.
Результат:
3 - 2
6 - 4
9 - 8
12 - 16
15 - 32
18 - 64
21 - 128
24 - 256
можно посчитать по формуле:
число 2 в степени (целое часть от деления времени на 4)
например, для 15 часов:
2 в степени (15/4=3) = 8 клеток
для 16-ти часов, уже = 16 клеток
Объяснение:
var a,i: integer;
begin
a:=1;
for i:=1 to 24 div 3 do
begin
a:=a*2;
writeln(3*i,' - ',a);
end;
end.
Результат:
3 - 2
6 - 4
9 - 8
12 - 16
15 - 32
18 - 64
21 - 128
24 - 256
можно посчитать по формуле:
число 2 в степени (целое часть от деления времени на 4)
например, для 15 часов:
2 в степени (15/4=3) = 8 клеток
для 16-ти часов, уже = 16 клеток
Объяснение: