Сообщение, записанное буквами из 16-символьного алфавита, содержит 120 символов. какой объем информации в байтах оно несет?

формула объема информации : i = log2k. k = 16 (так как символов в алфавите 16). то есть один символ несет i = log_2 16 = 4 бита информации. таких символов у нас 120, значит, 4 * 120 = 480 бит информации.

Исправленный код программы

var

a,b,c,x,y,k,l,j,v,d: integer;

begin

read(a);

read(b);

read(c);

k: =0-c;

d: =1;

for x: =1 to c do

  for y: =k to c do  

  begin

    if a*x+b*y=c then

    if d> =x then begin

      d: =x;

      v: =y;

    end;

  end; writeln(d,' ',v);

end.

объяснение

d это переменная, обозначающая минимальное значение x

ошибка была в строке   if d< =x then begin

если x меньше а не больше минимального, то минимальному должно присваиваться значение x

исправленная строка if d> =x then begin

// pascalabc.net 3.1, сборка 1230 от 27.04.2016 const   колстрок=3;   колстолбцов=5; begin   var массив: array [1..колстрок,1..колстолбцов] of integer;   var суммыпострокам: array[1..колстолбцов] of integer;   writeln('введите элементы массива (',колстрок,',',       колстолбцов,') построчно: ');   for var строка: =1 to колстрок do       for var столбец: =1 to колстолбцов do begin           read(массив[строка,столбец]);           суммыпострокам[строка]+=массив[строка,столбец]           end;   writeln('суммы построчно: ');   for var строка: =1 to колстрок do print(суммыпострокам[строка]) end. тестовое решение введите элементы массива (3,5) построчно: 7 -5 13 19 -11 8 23 -15 -6 0 12 -6 -9 0 12 суммы построчно: 23 10 9