Генератор Случайных Чисел

[regent2012]

Перем Число;

ГСЧ = Новый ГенераторСлучайныхЧисел;
ЗагаданноеЧисло = Цел(ГСЧ.СлучайноеЧисло(0, 100));
Угадал = Ложь;
Пока Угадал = Ложь Цикл
   ВвестиЧисло (Число, "Введите число от 0 до 100");
   Если Число > ЗагаданноеЧисло Тогда
      Предупреждение("Перелет ");
   ИначеЕсли Число < ЗагаданноеЧисло Тогда
      Предупреждение ("Недолет ");
   Иначе
      Предупреждение ("Угадал!!!");
      Угадал = Истина;
   КонецЕсли;
КонецЦикла;

[LordWizard]

А сказать то чего хотел, милок?