Даны числа х, у, х1, у1, х2, у2. Проверить истинность высказывания: «Точка с координатами (x, y) лежит внутри прямоуголь

@plzhelpme · Регистрация: 16.01.2018

Author24 — интернет-сервис помощи студентам

Даны числа х, у, х1, у1, х2, у2. Проверить истинность высказывания: «Точка
с координатами (x, y) лежит внутри прямоугольника, левая верхняя вершина
которого имеет координаты (x1, y1), правая нижняя - (х2, у2), а стороны параллельны
координатным осям ».

@Puporev · 18.01.2018, 10:20

Pascal

1	if(x>x1)and(x<x2)and(y>y2)and(y<y1) then лежит

@bormant · 18.01.2018, 10:24

Pascal

1	WriteLn((x1<=x) and (x<=x2) and (y2<=y) and (y<=y1));

@Puporev · 18.01.2018, 10:27

Наверное = не нужно, ибо в условии

Сообщение от plzhelpme

лежит внутри прямоугольника

@plzhelpme · 18.01.2018, 10:29 **[ТС]**

Распишите пожалуйста код сначала и до конца

@Puporev · 18.01.2018, 10:30

Не по теме:

Чичас, только шнурки поглажу..

@bormant · 18.01.2018, 10:41

Сообщение от Puporev

Наверное = не нужно, ибо в условии

лежит внутри прямоугольника

Если "принадлежит" отличается от "лежит внутри", то да, не нужно.

@plzhelpme · 18.01.2018, 11:07 **[ТС]**

Распишите пожалуйста код сначала и до конца

@Cyborg Drone · 18.01.2018, 17:12

plzhelpme, никогда не поверю, что Вы не можете написать этот код с начала до конца.

Pascal

var
  x, y, x1, y1, x2, y2: real;
 
begin
  writeln('Введите координаты левой верхней вершины прямоугольника:');
  write('x1 = ');
  readln(x1);
  write('y1 = ');
  readln(y1);
  writeln('Введите координаты правой нижней вершины прямоугольника:');
  repeat
    write('x2 > x1;  x2 = ');
    readln(x2);
  until x2 > x1;
  repeat
    write('y2 < y1;  y2 = ');
    readln(y2);
  until y2 < y1;
  writeln('Введите коорднаты точки:');
  write('x = ');
  readln(x);
  write('y = ');
  readln(y);
  write('Точка ');
  if (x <= x1) or (x >= x2) or (y <= y2) or (y >= y1) then write('не ');
  writeln('лежит внутри прямоугольника');
  readln
end.

@plzhelpme 0 / 0 / 0 Регистрация: 16.01.2018 Сообщений: 46
		1
	Даны числа х, у, х1, у1, х2, у2. Проверить истинность высказывания: «Точка с координатами (x, y) лежит внутри прямоуголь 18.01.2018, 10:18. Показов 2989. Ответов 8 Метки нет (Все метки) Даны числа х, у, х1, у1, х2, у2. Проверить истинность высказывания: «Точка с координатами (x, y) лежит внутри прямоугольника, левая верхняя вершина которого имеет координаты (x1, y1), правая нижняя - (х2, у2), а стороны параллельны координатным осям ». 0

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	18.01.2018, 10:27	4
	Наверное = не нужно, ибо в условии Сообщение от plzhelpme лежит внутри прямоугольника 0

@plzhelpme 0 / 0 / 0 Регистрация: 16.01.2018 Сообщений: 46
	18.01.2018, 10:29 [ТС]	5
	Распишите пожалуйста код сначала и до конца 0

@Puporev
	18.01.2018, 10:30 #6
	Не по теме: Чичас, только шнурки поглажу.. 0

@bormant Модератор 7769 / 4598 / 2823 Регистрация: 22.11.2013 Сообщений: 13,077 Записей в блоге: 1
	18.01.2018, 10:41	7
	Сообщение от Puporev Наверное = не нужно, ибо в условии лежит внутри прямоугольника Если "принадлежит" отличается от "лежит внутри", то да, не нужно. 0

@plzhelpme 0 / 0 / 0 Регистрация: 16.01.2018 Сообщений: 46
	18.01.2018, 11:07 [ТС]	8
	Распишите пожалуйста код сначала и до конца 0

	18.01.2018, 17:12