Кристина
Подскажите пожалуйста как работает программа!
Подскажите пожалуйста как работает программа!
Program;
Uses crt;
var X,Y:real;
begin
writeln ('Вводите координаты точки');
write ('X='); Readln (X);
write ('Y='); Readln (Y);
if (abs(x)