Нужно решить контрольную по информатике

program gh;

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

                i: integer;

begin

  for i: =1 to 10 do

        begin

              a[i] : = random(20) + 20;

              write(a[i]);

        end;

end.

б)имя существительное

2 единицы в двоичной записи числа 1025

10000000001

в1+в2=5

(в1+в2+в3)/3=3

(5+в3)/3=3

5+в3=9

в3=4