Создайте таблицу в Microsoft Access для создания новой базы данных. Создать структуру таблицы в режиме конструктора таблиц. Сохранить таблицу под именем Геометрические фигуры. Заполнить

таблицу согласно образцу. Обязательно заполнить поля Рисунок. Создать форму.

//Pascal ABC.NET 3.1 сборка 1219

Const
 n=5;

Var
 max1,max2,min1,min2,i:integer;
 ar:array[1..n] of integer;
begin
 max1:=integer.MinValue;
 max2:=integer.MinValue;
 min1:=integer.MaxValue;
 min2:=integer.MaxValue;
 for i:=1 to n do
  begin
   readln(ar[i]);
   if (ar[i]<max1) and (ar[i]>max2) then max2:=ar[i] else
   if ar[i]>max1 then
   begin
   max2:=max1;
   max1:=ar[i];
   end;
   if (ar[i]>min1) and (ar[i]<min2) then min2:=ar[i] else
   if ar[i]<min1 then
   begin
   max2:=max1;
   min1:=ar[i];
   end;
  end;
 writeln('Сумма максимумов:',max1+max2);
 writeln('Cумма минимумов:',min1+min2);
end.

Пример ввода:
1
2
3
4
5
Пример вывода:
Сумма максимумов:9
Cумма минимумов:3

1.Тождественный – это точно соответствующий кому- или чему-либо, оди-наковый.
Если объем одного понятия равен объему другого понятия, то между ними возникает отношение тождества.
Первый космонавт –Юрий Гагарин.
Столица России-город Москва.
2. Пересечением называют отношение между понятиями, объемы которых совпадают частично, т. е. содержат общие элементы.
Электронное письмо –письмо на русском языке.
Школьница-спортсменка.
3. Подчинением называют отношение между понятиями, когда объем одного из них полностью входит в объем другого понятия, но не исчерпывает его.
Хищник-лев.