На языке Паскаль составить программу, проверяющую…

На языке Паскаль составить программу, проверяющую, лежит ли данная точка с координатами (x,y) в первой четверти координатной плоскости. Программа должнавыводить на экран результат в виде: Точка с координатами (x,y) лежит в первой четверти координатной плоскости или Точка с координатами (x,y) не лежит в первой четверти координатной плоскости.

в избранное

nataliden

31 июля 2022

Program points; uses crt; var x, y: real; begin write ('Введите х: '); readln (x); write ('Введите y: '); readln (y); if (x > 0) and (y > 0) then writeln ('Точка с координатами (' , x , ',' , y , ') лежит в первой четверти координатной плоскости') else writeln ('Точка с координатами (' , x , ',' , y , ') не лежит в первой четверти координатной плоскости'); readlnend.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?