Составить программу, получающую информацию о двух окнах (координаты верхнего левого угла, ширину и высоту.

Заранее спасибо

--==KliM==--,
о каких окнах речь? Если о текстовых (созданных с помощью модуля CRT), то WindMin содержит координаты верхнего левого, а WindMax - координаты нижнего правого угла...
НО... В каждый момент времени только одно окно может быть активным, следовательно, работать с двумя окнами сразу, используя ЭТИ переменные, нельзя...

Если же речь об окнах графических (созданных с помощью процедур/функций модуля Graph), то там все зависит от реализации окон.

Я в этом ничо не понимаю! Забыд дописать что надо еще ответить на вопрос пересекаются ли они!

Вот сначала выясни, потом будешь спрашивать... А то устроили тут "принеси то, не знаю что"...

"получающую информацию" - видимо от пользователя задаются координаты, а в результате нужно выдать пересекаются они или нет.

Так?

Скорее всего ДА. Если знаешь напиши хоть чонить, а то экзамены скора!

Вот тебе функция:

Function InWin(x0,y0,xW,yH,xi,yi : byte) : Boolean;
Begin
  If ((xi>=x0) and (xi<=(x0+xW-1))) and ((yi>=y0) and (yi<=(y0+yH-1))) then InWin:=True else InWin:=False;
End;

А дальше попробуй додумать как ее использовать.

А полностью написать не можешь, а? Хотя и за это большое спасибо может как нибудь додумаюсь.