Var
x, y, z: integer ;
begin
x := 19;
y := 3;
z := y * 2;
y := x mod y;
x := x - z;
y := y + z;
writeln('x = ', x, ', y = ', y, ', z = ', z);
end.
Вывод
x = 13, y = 7, z = 6
<span>Информационное сообщение объемом 300 бит содержит 100 символов. Какова мощность алфавита?<span> <span>Дано:Объем сообщения = 300 бит
текст состоит из 100 символов
Какова мощность алфавита?</span></span>Решение:1. Определим вес одного символа: 300 / 100 = 3 бита.2. Мощность алфавита определяем по формуле: 2 3 = 8.</span>
Помогите пожалуйста разобраться в данной ситуации
Ответ:
3. 12
Объяснение:
Здесь цикл с постусловием, который прерывается когда z = 0
x = 96 y = 54
z = x mod y = 96 mod 54 = 42
z = 0 (нет) х = у = 54 у = z = 42
x = 54 y = 42
z = x mod y = 54 mod 42 = 12
z = 0 (нет) х = у = 42 у = z = 12
x = 42 y = 12
z = x mod y = 42 mod 12 = 6
z = 0 (нет) х = у = 12 у = z = 6
x = 12 y = 6
z = x mod y = 12 mod 6 = 0
z = 0 (да)
x = 12 y = 6