Верхний правый угол нажми на свой аватал , там есть выход .
Передвигаться по полю
И наблюдать за игроками
16 бит * 24000 Гц * 4 канала * 1 сек = 1536000 бит
1536000 бит / 8 = 192000 байт
192000 байт / 1024 = 187,5 кбайт.
187.5 кбайт / 1024 = 0,18310546875 мбайт
48 мбайт / 0,18310546875 мбайт = 262,144 секунд
из этих и выбери
Использовать Робот
алг
нач
нц пока не слева свободно и не сверху свободно
если не слева свободно и не сверху свободно то
закрасить
вниз
все
кц
нц пока не слева свободно и снизу свободно
вниз
кц
нц
пока не слева свободно и не снизу свободно
закрасить
вправо
кц
нц
пока не снизу свободно и справа свободно
вправо
кц
нц
пока не справа свободно и не снизу свободно
закрасить
вверх
кц
нц
пока не справа свободно и сверху свободно
вверх
кц
закрасить
нц пока не сверху свободно и слева свободно
влево
кц
кон
Var a, b, c, d, i : integer;
Begin
read(a);
read(b);
read(c);
read(d);
for i := a to b do
if (i mod c = d) then
writeln(i);
writeln();
for i := a to b do
if frac(sqrt(i)) = 0 then
writeln(i);
writeln();
for i := 2 to a-1 do
if a mod i = 0 then begin
writeln(i);
exit;
end;
End.