Найди верный ответ на вопрос по предмету Информатика, если вы не получили ответа или никто не дал верного ответа, то рекомендуется воспользоваться поиском и попытаться найти ответ на свой вопрос среди похожих запросов.
Новые вопросы по предмету Информатика:
Var x,y:real;
begin
write('X=');
read(x);
write('Y=');
read(y);
if (x>0) and (y>0) and (sqr(x)+sqr(y)0) and (y0) and (sqr(x)+sqr(y)=25) then writeln('Точка (',x,',',y,') принаджелит данной области')
else writeln('Точка (',x,',',y,' не принаджелит данной области');
end.