Массив А[1..5] заполнен числами3,8,5,7,6.Выполните действия с элементами массива:
а) For i : 1 to 5 do A[i] := -A[i];
б)For i := 1 to 5 do
If A[i] mod 3 = 0 Then A[i] := A[i] div 3

В результате такого приёма персонаж будет выглядеть объёмным на плоском экране телевизора.

При возможности добавьте в осветительную систему и четвёртый источник света, который будет служить фоновым освещением, с его можно будет изменять яркость освещения фона, расположенного за объектом съёмки на заднем плане.

Недостаток освещения при видеосъемке

Очень частой проблемой для операторов становится нехватка света. Многие камеры при малой освещённости выдают нечёткую, зашумленную (зернистую) картинку, что просто не может радовать.

Некоторые производители пишут что их камеры могут снимать при недостаточной освещённости (при горящей свече) камеры, конечно, могут снимать в этих условиях, но качество заставляет ожидать лучшего.

program v1;

Var a:array [1..10] of integer;

    i,j,j1,min,n,max,q:integer;

begin

 randomize;

for i:=1 to 10 do a[i]:=random(31)+10;

Writeln (' Znachenija matracy ');

for i:=1 to 10 do write (a[i]:3); writeln;

Max:=a[1];

for i:=1 to 10 do

 if a[i]>=max then begin

                   max:=a[i];

                   j:=i;

                   end;

min:=a[1];

for i:=1 to 10 do

 if a[i]<=min then begin

                   min:=a[i];

                   j1:=i;

                   end;

                 q:=a[j1];

                a[j1]:=a[j];

                a[j]:=q;

For i:=1 to 10 do write (a[i]:3); writeln;

Writeln (' Maxim element = ',max);

writeln (' Minim element = ',min);

end.