Предмет: Информатика,
автор: dimaSB
Попадёт ли точка в заданную область Написать программу в Паскале
Приложения:
Ответы
Автор ответа:
0
var
x,y:real;
begin
write('x=');
readln(x);
write('y=');
readln(y);
if (sqr(x)+sqr(y)<=1) then
if (x<0) and (y>0) then
writeln('no')
else
writeln('yes')
else
writeln('no');
end.
x,y:real;
begin
write('x=');
readln(x);
write('y=');
readln(y);
if (sqr(x)+sqr(y)<=1) then
if (x<0) and (y>0) then
writeln('no')
else
writeln('yes')
else
writeln('no');
end.
Похожие вопросы
Предмет: Математика,
автор: Аноним
Предмет: Окружающий мир,
автор: prokofevavm
Предмет: Математика,
автор: hjjbholng679
Предмет: Математика,
автор: vladarakljan
Предмет: Химия,
автор: Андрей19979