Какое число уменьшится в 8 раз при перенесении запятой влево на 3 знака: а) 1001010^2; б) 5000000^10; в)1100110^2; г)54621^16 ^n - это степень

Ядумаю что в . поставь лучший ответ.

  program ex;   var a,k,s,pr,i: integer; mas: array [0..10] of integer;   begin  pr: =1;   for i: =1 to 10 do    readln(mas[i]);     for i: =1 to 10 do    begin      if mas[i]> 0 then      pr: =pr*mas[i]      else        s: =s+mas[i];     end;     for i: =1 to 10 do      begin      if mas[i]< 0 then        k: =k+1;       end;   writeln('произведение=',pr);   writeln('сумма=',s);   writeln('количество=',k)  end.

1) не понятно , в комментах допишу, как только пойму. 2)var t,c: array [1..10] of integer;     i,sum: integer; begin for i: =1 to 10 do begin     t[i]: =random(20+i);     c[i]: =random(20000+i); end; for i: =1 to 10 do begin     sum: =sum+t[i]*c[i]; end; for i: =1 to 10 do begin     writeln('количество товара ',i,' вида ',t[i],'   стоимость товара ',i,' вида ', c[i]); end; writeln('общая сумма ',sum); end. 3) мы опишем его так     ves: array [1..31] of real; 4) var sum,x: real;     n,i: integer; begin read(n); for i: =1 to n do begin     read(x);     sum: =sum+x;     end; writeln(sum/n); end.