Дан фрагмент электронной таблицы

1)=А1/5+В1/4
2)=С2/3
3)=А1/5+В1
4)=(C1+D1)/5

1.) А1/5+В1/4

Объяснение:

А2 = (5+4)×2 = 18

В2 = (4+2)/3 = 2

С2 = (4/4)+1 = 2

D2 = A1/5 + B1/4 = 5/5 + 4/4 = 1+1 = 2

Так, как у нас три одинаковые части в таблице.

1 бит на 1 символ, поэтому:

14400*10=144000 символов 

336600*10=3366000 символов 

program xxx;

    var i, n : integer;

                      s : real;

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

begin

  writeln('введите размерность массива n=');

  readln(n);

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

  for i: =1 to n do

        readln(a[i]);

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

  for i: =1 to n do

        writeln(a[i]);

  s: =0;

  for i: =1 to n do

      if a[i]> 0 then s: =s+a[i];

  writeln('сумма положительных элементов =', s);

  readln

end.