Сдать решение c-треугольник
имя входного файла: triangle.in или стандартный поток ввода
имя выходного файла: triangle.out или стандартный поток вывода
ограничение времени: 1 с
ограничение памяти: 256m
треугольник
на координатной плоскости расположены равнобедренный прямоугольный треугольник abc с длиной катета d и точка x. катеты треугольника лежат на осях координат, а вершины расположены в точках: a(0,0), b(d,0), c(0,d). требуется написать программу, которая определяет взаимное расположение точки x и треугольника. если точка x расположена внутри или на сторонах треугольника, выведите 1. если же точка находится вне треугольника, выведите 0.
формат входных данных
в первой строчке вводится натуральное число d (не превосходящее 1000), во второй - координата точки x по оси ox (целое число из диапазона от -1000 до 1000), в третьей координата точки x по оси oy (целое число из диапазона от -1000 до 1000).
формат результата
если точка лежит внутри, на стороне треугольника или совпадает с одной из вершин, то выведите число 1. если точка лежит вне треугольника, то выведите 0.
ответ можно на любом языке программирования.
program temp;
var
d, x, y: Double;
begin
Write ('d, x, y: ');
ReadLn (d, x, y);
if (x >= 0) and (y >= 0) and (x + y <= d) then
WriteLn (1)
else
WriteLn (0);
ReadLn;
end.