Страница текста содержит 40 строк по 50 символов в каждой.сообщение, состоящее из 10 страниц текста, имеет информационный объем 12500 байтов.какова мощность алфавита?

40+50+10=100 и 12500 делем на 100 ответ 125

Python def summ(m): s = 0 while m > 0: s += m % 10 m = m // 10 return sfrom random import randomn = 10a = [0] * nfor i in range(n): a[i] = int(random() * 40) + 10 print('%4d' % a[i], end='')print()for i in range(n - 1): # количество переборов 9 for j in range(n - i - 1): # при первом переборе i=0 if summ(a[j]) > summ(a[j + 1]): a[j], a[j + 1] = a[j + 1], a[j]for i in range(n): print('%4d' % a[i], end='')print()for i in range(n): print('%4d' % summ(a[i]), end='')print()pascalconst     n  =  10; var     arr:   array[1..n]  of  integer;     i,   j:   byte;     a:   integer; function   sum  (n:   integer):   byte;       begin         sum  : =  0;           while   n >   0  do  begin             sum  : =   sum  +   n  mod  10;             n  : =   n  div  10;           end;       end; begin     randomize;       for   i  : =  1  to   n  do  begin         arr[i]  : =   random(20)+10;           write  (arr[i]: 3);       end;       writeln;               for   i  : =  1  to   n-1  do  // количество проходов по массиву           for   j  : =  1  to   n- i  do  // количество сравнений в каждом проходе               if   sum(arr[j])   > sum(arr[j+1])  then  begin                 a  : =   arr[j];                 arr[j]  : =   arr[j+1];                 arr[j+1]  : =   a;               end;         for   i  : =  1  to   n  do           write(arr[i]: 3);       writeln;       for   i  : =  1  to   n  do           write(sum(arr[i]): 3);       writeln; end .

Составной оператор - это команда позволяющая выполнить ряд команд вместо одной после then или else. program vosrastanie; var a, b, c, y : real; begin     writeln('');     readln(a,b,c);     y: =a;     if y > b then                  else y: =b;     if y> c then                  else y: =c;     writeln(y) end.