Программа на 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.
Пример вывода на прикреплённом рисунке.
1) В информатике понятие "система" чаще используют относительно набора технических средств и программ. Системой также называют аппаратную часть компьютера. Когда мы дополняем понятие "система" словом "информационная", то хотим подчеркнуть цель ее создания и функционирования.
искуственная система:система телефонных связей ,энергосистема
естественная система:галактика,комета ,система звезд
2) Персональный компьютер — система, включающая подсистемы аппаратного обеспечения, программного обес-печения и информационных ресурсов.
Персональный компьютер — подсистема системы «человек — компьютер». Средства,- обеспечивающие взаимосвязь между объектами этой системы, называют интерфейсом.
3) Системный эффект (эмерджентность) - возникновение у сложной системы новых свойств за счет взаимодействия составляющих систему узлов. Свойства системы не совпадают со свойствами ее составных подсистем
пример: Например, ни одна часть тела человека по отдельности не сыграл на рояле музыку Шопена, а весь человек (при условии обученности, разумеется) может.
4)эмерджентность - в теории систем — появление у системы свойств, не присущих её элементам в отдельности; несводимость свойств системы к сумме свойств её компонентов.
5) Системный подход представляет собой универсальный метод исследования, основанный на восприятии исследуемого объекта как нечто целого, состоящего из взаимосвязанных частей и являющегося одновременно частью системы более высокого порядка.
6)например протяженность дорог в километрах
7) Коперник - совершил переворот в естествознании, раскрыл истинное строение солнечной системы. Линней - создал искусственную систему животного и растительного мира. Вернадский - создал науки: геохимию, биогеохимию, радиогеологию
10) Кибернетика — наука об оптимальном управлении сложными динамическими системами, изучающая общие принципы управления и связи, лежащие в основе работы самых разнообразных по природе систем — от самонаводящих ракет-снарядов и быстродействующих вычислительных машин до сложного живого организма.
