4σ (s! +s) s=1 найдите ошибку, program mar; uses crt; var f, s: integer; k: real; begin clrscr; f: =1; k: =0; for s: =1 to 4 do begin f: =f*s; k: =k*(f+s); end; writeln('k =',k: 4: 2); readkey; end.

вот так?

program solution; uses crt; var s : byte; res, fact : word; beginfact : = 1; res : = 0; for s : = 1 to 4 do              begin              res : = res + s + fact;               fact : = fact * (s + 1);               end; write(res); readkey; end.

i = log₂ (1/p)

log₂ (1/p) = 4

1/p = 2⁴

1/p = 16

p = 1/16 вероятность появления автобуса n1

вероятность появления автобуса n2: р = 1/16 : 2 = 1/32

i = log₂ (1/1/32) = log₂ 32

i = 5 бит

5 бит информации несет сообщение о появлении автобуса n2.