Пусть множества А (-1, 1), В - [-1, 0) - интервалы числовой прямой. Запишите с интервалов множество К, равное: 1) AUB; 2) AnB

Объяснение:

Градие́нт (англ. Gradient) — вид заливки в компьютерной графике, которая по заданным параметрам цвета в ключевых точках рассчитывает промежуточные цвета остальных точек. При этом создаются плавные переходы из одного цвета в другой. Обычно в градиенте можно использовать более двух цветов и дополнительно указывать настройки прозрачности и смещения границы цветов.

Кроме того, для удобства обозначения, градиентом часто называют сами цвета отправных точек, относительно которых происходит расчет заливки. При этом слово градиент имеет смысловую окраску «максимальная градация цвета» или «максимальный уклон, отклонение» достигнутое цветом в этой точке.

1)
Const
n=10;
var
a:array[1..n]of integer;
i,s:integer;
begin
    for i:=1 to n do
          begin
              a[i]:=random(41)-20;
              write(a[i]:4);
                    if a[i]<0 then
                          s:=s+a[i];
           end;
writeln;
writeln(' S= ',s);
end.
2)
Const
n=20;
var
i,s:integer;
a:array[1..n]of integer;
begin
    for i:=1 to n do
          begin
              a[i]:=random(11)+15;
              write(a[i]:4);
                  if a[i]mod 2=0 then
                       s:=s+a[i];
         end;
writeln;
writeln('S = ',s);
end.