Программа на PascalABC
Program 29844007;
uses
GraphABC;
var
XL1,YL1,XR1,YR1:integer; ///координаты первого прямоугольника
XL2,YL2,XR2,YR2:integer; ///координаты второго прямоугольника
XL0,YL0,XR0,YR0:integer; ///координаты результата
s:string; ///строка для вывода результатов;
begin
Window.SetSize(700,700);
writeln('Первый прямоугольник: ');
writeln('Введите X левого нижнего угла ');read(XL1);
writeln('Введите Y левого нижнего угла ');read(YL1);
writeln('Введите X правого верхнего угла ');read(XR1);
writeln('Введите Y правого верхнего угла ');read(YR1);
writeln('Второй прямоугольник: ');
writeln('Введите X левого нижнего угла ');read(XL2);
writeln('Введите Y левого нижнего угла ');read(YL2);
writeln('Введите X правого верхнего угла ');read(XR2);
writeln('Введите Y правого верхнего угла ');read(YR2);
if XL1<XL2 then XL0:=XL1 else XL0:=XL2;
if YL1<YL2 then YL0:=YL1 else YL0:=YL2;
if XR1<XR2 then XR0:=XR2 else XR0:=XR1;
if YR1<YR2 then YR0:=YR2 else YR0:=YR1;
/// Выводим сначала результирующий прямоугольник синим цветом
Brush.Color := clBlue;
Rectangle(XL0,700-YL0,XR0,700-YR0);
/// Рисуем первый прямоугольник красным цветом
Brush.Color := clRed;
Rectangle(XL1,700-YL1,XR1,700-YR1);
/// Выводим второй прямоугольник зелёным
Brush.Color := clGreen;
Rectangle(XL2,700-YL2,XR2,700-YR2);
/// Выводим кординаты
Brush.Color := clWhite;
s:='Координаты левого нижнего угла: '+ IntToStr(XL0)+' '+IntToStr(YL0);
TextOut(0,0,s);
s:='Координаты правого верхнего угла: '+ IntToStr(XR0)+' '+IntToStr(YR0);
TextOut(0,20,s);
end.
Пример вывода на прикреплённом рисунке.
ответ: южно-казахстанская область является одним из крупных регионов республики и граничит на востоке с жамбылской областью, на севере - с карагандинской, на западе - с кызылординской областью и на юге - с узбекистаном. ее территория - 117,3 тыс.кв.км, здесь проживает около 2,5 млн.человек.
в административно-территориальную структуру области входят 4 области и 4 города районного значения, 11 сельских районов. объем городского населения – 36,8%. областной центр - город шымкент.
регион богат месторождениями полезных ископаемых, таких как барит, уголь, железные и полиметаллические руды, бентонитовые глины, вермикулит, тальк, известняк, гранит, мрамор, гипс, кварцевые пески. по запасам урана область занимает первое место, фосфоритов и железных руд - третье место по республике.
область располагает двумя направлениями железных дорог, общей протяженностью 444,6 км, автомобильными дорогами общего пользования 5,2 тыс.километров, в т.ч. с твердым покрытием - 5,1 тыс. километров.
гражданская авиация работает на линиях протяженностью 27 тыс. км.
областной центр расположен на оси международной магистрали оренбург - ташкент и туркестано-сибирской магистрали. кроме того, имеет удобные связи по автомагистралям: ташкент - шымкент - тараз - алматы и ташкент - шымкент - туркестан - самара.
в промышленности области действуют 182 крупных и средних предприятия, производящих около 2,0 процентов объема промышленной продукции казахстана.
доля отдельных отраслей в общем объеме выпускаемой в области промышленной продукции выглядит следующим образом:
перегонка нефти – 8,9%;
текстильная и швейная промышленность – 4,8%;
производство и распределение электроэнергии, газа и воды – 10,6%;
производство пищевых продуктов и табачных изделий – 38,0%;
производство цветных металлов – 3,6%;
машиностроение – 5,8%;
другие отрасли - 28,3%.
в число наиболее крупных предприятий республики входят: оао «петроказахстан ойл продакс», зао «южполиметалл», оао «шымкентцемент», оао «асбоцемконструкция», оао «шымкентмай», оао «химфарм», тоо «шымкентпиво», зао «джей ти ай сентрал эйжа».
южно-казахстанская область располагает значительным производственно- потенциалом. это один из самых трудоизбыточных регионов казахстана.
объяснение: