ritm9393
27.12.2011, 8:31
вот это надо решить
Andy51
27.12.2011, 8:47
ritm9393, что это?
CrashX
27.12.2011, 10:48
какая то фигура на плоскости)
возможно надо площадь фигуры рассчитать,больше не вижу что еще можно с ней сделать
возможно надо площадь фигуры рассчитать,больше не вижу что еще можно с ней сделать
DmT
27.12.2011, 11:35
че сделать то?
ritm9393
27.12.2011, 16:58
всё уже не нужно ,помогли решить
должно было что типо этого
Program Point ;
Uses crt;
Var X,Y : real;
L: boolean;
Begin
Clrscr;
Write('Введите X:' );
Readln(X);
Write(' Введите Y :' );
ReadLn(Y);
L:= (X<=0)and (Sqr(X)+Sqr(Y)<=9) and (Y>=-X-3) or (X>=0) and (Sqr(X)+Sqr(Y)<=25);
WriteLn (' Точка лежит в заданной области? ', L);
Readkey;
End.
должно было что типо этого
Program Point ;
Uses crt;
Var X,Y : real;
L: boolean;
Begin
Clrscr;
Write('Введите X:' );
Readln(X);
Write(' Введите Y :' );
ReadLn(Y);
L:= (X<=0)and (Sqr(X)+Sqr(Y)<=9) and (Y>=-X-3) or (X>=0) and (Sqr(X)+Sqr(Y)<=25);
WriteLn (' Точка лежит в заданной области? ', L);
Readkey;
End.
DmT
27.12.2011, 17:49
facepalm.jpg
CrashX
28.12.2011, 7:41
Andy51
28.12.2011, 8:45
kai...
28.12.2011, 20:52
ritm9393, мой опыт работы в техподдержке недостаточно высок 