Будь ласка іть нада написати програму в basic з цих двох алгоритмі​

2^i = 24

i = 5

ответ. 5 лампочек.

  друг  жить на любом этаже дома. поэтому, для решения используем уравнение 24=х. но 24=16. следовательно, х=16. в доме 16 этажей.

program xxx;

    var i, k : integer;

                  a : array [1..10] of real;

begin

  write('введите элементы массива а: ');

  for i: =1 to 10 do

        readln(a[i]);

  writeln('исходный массив а: ');

  for i: =1 to 10 do

        write(a[i]);

  k: =0;

  for i: =1 to 9 do

      if a[i]< > a[10] then k: =k+1;

  writeln('элементов отдичных от последнего -', k);

  readln

end.

1) 35-25=10 (чел.) - не являются читателями школьной библиотеки

2) 35-20=15 (чел.) - не являются читателями районной библиотеки

3) (25+20)-35=10 (чел.) - читатели обеих библиотек

4) 20-10=10 (чел.) - читатели только районной библиотеки

5) 25-10=15 (чел.) - читатели только школьной библиотеки