Сообщение, с проблемой выводом даты

&НаКлиенте
Процедура ПримерVI(Команда)
    // Запрашиваем у пользователя ввод данных
    ЧислоДня = ВвестиЧисло("Введите число дня (1-31):");
    ЧислоМесяца = ВвестиЧисло("Введите число месяца (1-12):");
    ЧислоГода = ВвестиЧисло("Введите число года:");
    
    // Проверяем корректность введенных данных
    Попытка
        Дата = Дата(ЧислоГода, ЧислоМесяца, ЧислоДня);
    Исключение
        Сообщить("Ошибка: Введена некорректная дата!");
        Возврат;
    КонецПопытки;
    
    // Форматируем дату в строку (например, "1 марта 1991 г.")
    ФорматДаты = "DD MMMM YYYY ""г.""";
    СтрокаДаты = Формат(Дата, "ДФ=" + ФорматДаты);
    
    // Выводим результат
    Сообщить("Введены числа " + ЧислоДня + ", " + ЧислоМесяца + ", " + ЧислоГода);
    Сообщить(СтрокаДаты);
КонецПроцедуры

МоеЧисло = 0;
    ЧислоВведено = ВвестиЧисло(МоеЧисло, "Подсказка"); 
    
    
    Если ЧислоВведено Тогда
        Сообщить(МоеЧисло);
    Иначе 
        Сообщить("Пользователь не ввел число");
    КонецЕсли;