Предмет: Информатика,
автор: 2016dreamer2016
Хеееееееелп
Написать программу, которая определит принадлежит ли заштрихованной области (рисунок) точка с координатами X,Y
Приложения:
Ответы
Автор ответа:
1
// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!
begin
var (x,y):=ReadReal2('Введите через пробел координты x и y точки:');
if (x>0) and (x*x+y*y<25) and (x*x+y*y>9) then Writeln('Принадлежит')
else Writeln('Не принадлежит')
end.
// Внимание! Если программа не работает, обновите версию!
begin
var (x,y):=ReadReal2('Введите через пробел координты x и y точки:');
if (x>0) and (x*x+y*y<25) and (x*x+y*y>9) then Writeln('Принадлежит')
else Writeln('Не принадлежит')
end.
Приложения:
Похожие вопросы
Предмет: Математика,
автор: IMTHETUYAARA
Предмет: Қазақ тiлi,
автор: arystan26
Предмет: Математика,
автор: ulanahajbullina089
Предмет: Математика,
автор: uset284839
Предмет: История,
автор: Аноним
var x,y:Real;
begin
writeln ('Введите через пробел координты x и y точки:');
readln (x, y);
if (x>0) and (x*x+y*y<25) and (x*x+y*y>9)
then Writeln('Принадлежит')
else Writeln('Не принадлежит')
end.