2 т.к. 3к байтов = 24к битов
И 24к делим на 5*32*80=12к
Var
x,y:real;
begin
Write('Введите координаты точки: ');
Read(x,y);
if (y>=-x*x) and (y>=-x-2) and (x<=0) then Writeln('Входит')
else Writeln('Не входит')
end.
Тестовое решение
Введите координаты точки: -1 -0.5
Входит
1 : наливаем воду в 4 литровый сосуд
2 : выливаем из 4 в 5
3: набираем еще один 4л сосуд и сливаем из 4 в 5 под завязку
5. Таким образом имеем 3 литра в 4л сосуде
4: Освобождаем 5л сосуд и сливаем в него воду из 4л. Таким
образом имеем пустой 4л сосуд и 3 литра воду в 5л емкости.
5: набираем полный 4л сосуд и сливаем в 5л емкость(в которой
уже 3 литра). В итоге у нас остается 2 литра воды в 4 литровом сосуде.