На вход программе подается одна строка – числа, разделенные пробелами. Считайте эти числа в список. Найдите для него максимальный элемент, минимальный элемент и сумму элементов. На вход программе подается одна строка – числа, разделенные пробелами. Считайте эти числа в список. Отсортируйте элементы списка по возрастанию и по убыванию. Выведите полученные списки на экран.

На вход программе подается одна строка, состоящая из слов на английском языке, разделенных пробелами. Создайте список из слов и выведите его элементы по одному в строке.

На вход программе в первой строке подается число n – количество слов в списке, затем n строк по 1 слову в каждой. Выведите элементы списка в одну строку, разделяя их запятыми.

function Fact(n:integer):integer;

var

  rez, i:integer;

begin

  rez := 1;

  for i := 2 to n do

    rez := rez * i;

  Fact := rez;

end;

function Pow(a, x:integer):integer;

var

  rez, i:integer;

begin

  rez := 1;

  for i := 1 to x do

    rez := a * rez;

  Pow := rez;

end;

var

  a, b, n, i:integer;

  F:real;

begin

  write('a = '); readln(a);

  write('b = '); readln(b);

  write('n = '); readln(n);

  F := 0;

  for i := 1 to n do

    F := F + Fact(n - i + 1)/(Pow(a,i) - Pow(b, i));

  writeln('F = ', F);

end.

1) ответ:

2^i=n

2^i=32

i=5

один символ=5 бит

2) 64=2⁶

следовательно ,требуется 6-разрядный двоичный код

3) 2^i=n, n = 16

2^i=16

i=4 бит

50 * 4 = 200 бит

200: 8 = 25 байт

4) используем формулу 2^i=n. так как в алфавите 16 символов (n=16), то  2^i=16, следовательно i=4. 4 бита весит один символ. 384*4=1536. 1536 бит весит сообщение из 384 символов по 4 бита каждый. переводим биты в байты. 1 байт=8 бит, 1536/8=192 байта. переводим байты в килобайты. 1 килобайт=1024 байт. 192/1024=0,1875 килобайт весит все сообщение. так что лучше ответ оставить в байтах (192 байта).