Ветвления (Paskal) - Помощь студентам

GioN · 25.09.2012, 20:03

Даны действительные числа x, y. Определить, принадлежит ли точка с координатами (x, y) заштрихованной части плоскости

rubius2008 · 25.09.2012, 20:32

Код:

...
if (x>=-2) and (x<=0) and (y>=-1/2*x-1) and (y<=1/2*x+1) or (x>=0) and (x*x+y*y<=1) then writeln('принадлежит') else writeln('не принадлежит');
...

25.09.2012, 20:32	#2
rubius2008 Форумчанин Регистрация: 19.03.2010 Сообщений: 409	Код: `... if (x>=-2) and (x<=0) and (y>=-1/2x-1) and (y<=1/2x+1) or (x>=0) and (xx+yy<=1) then writeln('принадлежит') else writeln('не принадлежит'); ...` Есть вопросы, пишите в ЛС.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
циклы и ветвления	zolman	Помощь студентам	2	24.12.2011 02:46
paskal abc,turbo paskal	andrei57	Паскаль, Turbo Pascal, PascalABC.NET	3	08.09.2011 05:33
Free Paskal и Turbo Paskal	Polly~Sunbeam	Паскаль, Turbo Pascal, PascalABC.NET	7	18.04.2011 16:00
Ветвления (Pascal)	Evgen90	Помощь студентам	3	01.12.2010 16:52
Ветвления.	glupayastudentka	Помощь студентам	1	23.06.2009 22:38