• Напишите программу, пожалуйста, на Pascal.

    Даны координаты нижнего левого угла квадрата на плоскости X и Y, и его площадь S. Требуется проверить, попала ли точка, координаты которой задаёт пользователь, внутрь или на границу квадрата.

Ответы 1

  • uses crt;var x,y,s,z1,z2,c1,c2:real;beginwrite('s=');read(s);write('x=');read(x);write('y=');read(y);s:=sqrt(s);write('vvedite 1 koordinaty');read(c1);write('vvedite 2 koordinaty');read(c2);z1:=s+x;z2:=s+y;if (c1<=z1)and(c2<=z2)and(c1>=x)and(c2>=y) thenwrite('to4ka popala')elsewrite('to4ka ne popala.');read;end.

     

    где с1-первая координата, с2-вторая, z1 и z2-вспомогательные точки))) ну там разберешься)))

  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years