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