• Что здесь не так? 7 строчка: Форматное выражение может использоваться только внутри write, writeln и str.

    Сама программа:
    program n_1;
    var x1, x2, y1, y2, x, y: integer;
    a: Boolean;
    begin
    writeln ('Введите значения координат');
    readln (x1, x2, y1, y2, x, y);
    a:= (x>x1)and(x<2)and(y>y2)and(y<y1);
    writeln ('x=a');
    writeln ('y=a');
    writeln ('Точка с координатами принадлежит прямоугольнику', a);
    end.

Ответы 11

  • Если брать за вершины верх левый и низ правый то будет правильно (y>y2)and(y<y1)
    • Автор:

      erinsxyk
    • 5 лет назад
    • 0
  • Если брать за вершины низ левый и верх правый то будет правильно (y>y1)and (y<y2)
  • Спасибо большое!
  • :)
  • Сделайте рисунок и проверьте
    • Автор:

      isaacjgvt
    • 5 лет назад
    • 0
  • За вершины прямоугольника берите верх левый и низ правый
  • Должно работать)
    • Автор:

      chanel
    • 5 лет назад
    • 0
  • Что-то я туплю... Тогда разве x не должны тоже меняться?
    • Автор:

      caylee
    • 5 лет назад
    • 0
  • х местами не меняется он как был справа и с лева так и остался, он поменял свое положение сверху вниз и наоборот
    • Автор:

      joan
    • 5 лет назад
    • 0
  • Если не понимаете могу графически объяснить)
    • Автор:

      rorym2c1
    • 5 лет назад
    • 0
  • program n_1;var x1, x2, y1, y2, x, y: integer;a: Boolean;beginwriteln ('Введите значения координат');readln (x1, x2, y1, y2, x, y);a:= (x>x1)and(x<x2)and(y>y1)and (y<y2);writeln ('Точка с координатами принадлежит прямоугольнику ', a);end.И мне кажется, что было бы удобнее вводить сначала одни координаты (x1,y1), а затем другие (x2,y2)...
  • Добавить свой ответ

Войти через Google

или

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

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

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