Дано целое число n сформировать целочисленный массив размера n создать массив каждый элемент которого в три раза больше предыдущего вход n=6 5 3 8 1 30 50 выход : 15 9 24 3 90 150

Type point = record         x,y: real;       end; var vc: array [1..4] of point;     bg,nd: point;     i,j,k,m: integer; begin  writeln('координаты точек - через пробел ');   for i: =1 to 4 do   begin     write('точка   ',i,'     ');     readln(vc[i].x,vc[i].y);   end; { сравнение векторов }       m: =0;       for i: =2 to 4 do       begin         bg.x: =vc[i].x-vc[1].x;         bg.y: =vc[i].y-vc[1].y;         j: =1;   k: =1;         while ((j=1) or (j=i)) do j: =j+1;         while ((k=1) or (k=i) or (k=j)) do k: =k+1;         nd.x: =vc[j].x-vc[k].x;         nd.y: =vc[j].y-vc[k].y;         if ((bg.x=nd.x) and (bg.y=nd.y)) or         ((bg.x=-nd.x) and (bg.y=-nd.y)) then         begin             m: =1;             break;           end;     end;     if m=1 then writeln('точки образуют параллелограмм')     else writeln('точки не образуют параллелограмм'); end.

Посчитаем сколько символов в сообщении: на странице 25 строк, в каждой из которых по 60 символов. следовательно, на одной странице находится 25 х 60 = 1500 символов. всего в сообщении 3 страницы, поэтому весь текст состоит из 1500 х 3 = 4500 символов. определим сколько бит в исходном тексте. 1 байт = 8 бит, следовательно, 1125 байт = 9000 бит. в тексте, занимающем 9000 бит 4500 символов, следовательно, на 1 символ приходится 9000 : 4500 = 2 бита. при 2-х битного бинарного кода можно закодировать 2 ^ 2 = 4 комбинации. ответ: в искомом алфавите 4 символа.