То же самое, что и в предыдущих блоках было, выполнить 1 раз в отношении переменной D.
Алгоритм:
1) Максимальное =A
2) Если B>максимального, то максимальное=B
3) Если C>максимального, то максимальное=C
4) Если D>максимального, то максимальное=D
Var s,k,m:integer;
begin
write('s = ');
readln(s);
k:=s div 800;
m:=s mod 800;
writeln('Кругов: ',k,' и ещё метров: ',m);
end.
Пример:
s = 5020
Кругов: 6 и ещё метров: 220
I=6144 байт= 8*6144 бит
k= 6144 символов
i- вес одного символа
I=I/k = 8
N=2^i - алфавит
N=256
Дано:
375 байт * 8 = 3000 бит - объем этого сообщения
Р=500 символов
Решение:
3000÷500 = 6 бит (информ. вес каждого символа в этом сообщении).
Находим мощность алфавита по формуле <em>N = 2^i</em>
N = 2^6 = 64 (мощность этого алфавита)
Ответ: Вес- 6 бит, Мощность - 64 символа.