Ребятаа, помоги прошу. Самостоятельная:(
1.даны два числа m n. большее из этих чисел уменьшить на 3, а меньшее удвоить. составьте алгоритм.
2. составьте алгоритм попадания точки в третью четверть окружности.

1.var m,n:real;beginwriteln ('Введите 2 числа:');readln (m,n);if m>n then beginm:=m-3;n:=n*2;writeln ('m = ',m,' n = ',n)endelse beginn:=n-3;m:=m*2;writeln ('m = ',m,' n = ',n);end;end.А второе я не знаю как решить(