Ребятаа, помоги прошу. Самостоятельная:(
1.даны два числа m n. большее из этих чисел уменьшить на 3, а меньшее удвоить. составьте алгоритм.
2. составьте алгоритм попадания точки в третью четверть окружности.
Ответ
Автор - NiGhtWolFs
1.
var m,n:real; begin writeln ('Введите 2 числа:'); readln (m,n); if m>n then begin m:=m-3; n:=n*2; writeln ('m = ',m,' n = ',n) end else begin n:=n-3; m:=m*2; writeln ('m = ',m,' n = ',n); end; end.