Var
a: array [1..5] of integer;
i: byte;
k: integer := Integer.MaxValue;
begin
for i := 1 to 5 do
readln(a[i]);
for i := 1 to 5 do
k := Min(k, a[i]);
writeln(k);
<span>end.</span>
1 симаол = 1 байт
соответственно в сообщение 10500 символов
Болт-бот = л л=11-8=3 вол = 9 во = вол - л = 9 - 3 = 6 лото = 12 ото = лото - л = 12 - 3 = 9 бот = 8, значит о>б на 1, л = 3 , о = 2, 6 = 1, тогда т = 9-2-2 = 5, а в = 6 - 2 = 4
<span>Скорость = 28800 бит/с </span>
<span>объем информации= 60*30*100 = 180000байт = 1440000 бит </span>
<span>время -это объем разделить на скорость -то есть 1440000/28800= 50с </span>