Создайте программу в паскале. программа должна делать: 1 . генерирует случайное число от 100 до 999; 2. находит и выводит в сообщении отдельные цифры этого числа.
Количество информации определяется величиной, показывающей насколько уменьшилось наше незнание в вопросе. 1. Если на светофоре горит желтый свет и мы не знаем, какой свет горел на нем до желтого, то возможны два исхода - зеленый свет и красный свет. Какой бы из них потом не загорелся, мы получим выбор 1 из 2 возможных. А этому соответствует один бит информации. 2. Если на светофоре горит красный свет и это "нормальный светофор", то мы ЗНАЕМ, что после красного света всегда следует желтый. Поэтому при зажигании желтого света наше незнание не меняется, следовательно, мы получаем ноль бит информации.
PascalABC.NET
begin
var n :=Random(100, 999);
n.Println;
Print('Цифры числа:');
while n > 0 do
begin
Print(n mod 10);
n := n div 10;
end;
end.