PASCAL! Верно ли , что: "данные числа x,y являются координатами точки, лежащей в первой координатной четверти"?
Program one; var x,y:real; begin readln(x,y) if x>0 and y>0 then write('Верно') ; else write('Нет'); end