Program z1;
Var c,i:integer;
Begin
Read (n,i);
If not(c=2) then
For i to 0 do
begin
c:=c+1;
i:=i-2;
end;
writeln(n);
end.
4, так как углы комнаты находятся напротив друг друга.
<span>Hand to hand combat это на английском
</span>
Получается 800 мегабайт,поблагодари меня плиз)
Задание сделано в формате Эксель