Вывести прописью вводимое пользователем число без дробной части

1.

2.

• А КАК ВЫВЕСТИ ПРОПИСЬЮ ВВОДИМОЕ
ПОЛЬЗОВАТЕЛЕМ ЧИСЛО БЕЗ ДРОБНОЙ
ЧАСТИ?
• Перем ВводимоеЧисло;
ВвестиЧисло(ВводимоеЧисло, "Введите
число"); ФорматнаяСтрока = "Л=ru_RU";
ПараметрыПредметаИсчисления = " , , , , , , , ,
0";
Сообщить(ЧислоПрописью(ВводимоеЧисло,
ФорматнаяСтрока,
ПараметрыПредметаИсчисления));

3.

• А КАК ВЫВЕСТИ ПРОПИСЬЮ ВВОДИМУЮ
ПОЛЬЗОВАТЕЛЕМ СУММУ В РУБЛЯХ И КОПЕЙКАХ?
• Перем ВводимоеЧисло;
ВвестиЧисло(ВводимоеЧисло, "Введите число");
ПараметрыПредметаИсчисления = "рубль, рубля,
рублей, м, копейка, копейки, копеек, м, 2";
ФорматнаяСтрока = "Л=ru_RU; ДП=Истина";
Сообщить(ЧислоПрописью(ВводимоеЧисло,
ФорматнаяСтрока,
ПараметрыПредметаИсчисления));

4.

• А КАК ПРИБАВИТЬ К ТЕКУЩЕЙ ДАТЕ СУТКИ?
СекундВМинуте = 60; СекундВЧасе =
СекундВМинуте*60; СекундВСутках =
СекундВЧасе*24;

5.

• А КАК ПРИБАВИТЬ К ЗАДАННОЙ ДАТЕ
ПОЛГОДА? ПолученнаяДата =
ДобавитьМесяц('20120315', 6);

6.

• А КАК ВЫЧЕСТЬ ОТ ВВЕДЕННОЙ
ПОЛЬЗОВАТЕЛЕМ ДАТЫ 2 МЕСЯЦА?
• Перем ВводимаяДата;
• ВведеннаяДата =
ВвестиДату(ВводимаяДата,"Введите дату");
ВводимаяДата =
ДобавитьМесяц(ВводимаяДата, -2);

7.

• А = "12345"; ПреобразованноеА = Число(А);
Сообщить("ПреобразованноеА")

8.

• Б = "какая-то надпись"; ПреобразованноеБ
= Число(Б);
Сообщить("ПреобразованноеБ");

9.

• Стр = Формат(587950.471, "ЧЦ=10; ЧДЦ=2");
Сообщить(Стр);
• Здесь ЧЦ=10 означает длину значения,
ЧДЦ=2 — количество знаков после запятой.
Результат выполнения: 587 950,47.

10.

• Стр = Формат('20120313204547', "ДФ=""дд ММММ
гггг ЧЧ:мм:сс"""); Сообщить(Стр);
• параметр дд означает номер дня в 12-часовом
варианте с лидирующим нулем (т. е. 3 марта будет
отражено, как 03 марта);
• параметр ММММ — полное название месяца;
параметр гггг — номер года с веком;
• параметр ЧЧ — час в 12-часовом формате с
лидирующим нулем;
• параметр мм — минута с лидирующим нулем;
параметр сс — секунда с лидирующим нулем.
Результат выполнения: 13 марта 2012 20:45:47.

11.

• А КАК ВЫВЕСТИ ВВЕДЕННУЮ
ПОЛЬЗОВАТЕЛЕМ ДАТУ В ФОРМАТЕ "8
МАРТА 2012 Г."?
• Перем ВводимаяДата;
• ВведеннаяДата =
ВвестиДату(ВводимаяДата,"Введите дату");
ВводимаяДата = Формат(ВводимаяДата,
"ДЛФ=ДД"); Сообщить(ВводимаяДата);

12.

• ПроверочнаяПеременная = 7;
БольшеДесятиИлиМеньше =
?(ПроверочнаяПеременная>10, "Да,
больше 10","Нет, меньше или равно 10");
Сообщить(БольшеДесятиИлиМеньше);

13.

• Перем ПроверочнаяПеременная;
ВвестиЧисло(ПроверочнаяПеременная,
"Введите число");
БольшеДесятиИлиМеньше =
?(ПроверочнаяПеременная>10, Истина,
Ложь);
Сообщить(БольшеДесятиИлиМеньше);

14.

• Если ЛогическоеВыражение Тогда; ...
• // Этот блок программного кода сработает, если
условие выполняется ...
• [ИначеЕсли ЛогическоеВыражение Тогда] ...
• // Этот блок программного кода сработает, если первое
условие не выполняется, а это — выполняется ...
• [Иначе] ...
• // Этот блок программного кода сработает, если ни
одно условие из приведенных выше не выполнилось ...
• КонецЕсли;

15.

• Перем ПроверочнаяПеременная;
ВвестиЧисло(ПроверочнаяПеременная,
"Введите число");
• Если ПроверочнаяПеременная > 10 Тогда
Сообщить(Истина);
• Иначе Сообщить(Ложь);
• КонецЕсли;

16.

• Перем ПервоеЧисло, ВтороеЧисло;
• ВвестиЧисло(ПервоеЧисло, "Введите первое
число");
• ВвестиЧисло(ВтороеЧисло, "Введите второе
число");
• Если ПервоеЧисло > ВтороеЧисло Тогда
Сообщить("Первое число больше второго");
• Если ПервоеЧисло >= ВтороеЧисло*10 Тогда
Сообщить("Причем намного больше");
• ИначеЕсли ПервоеЧисло >= ВтороеЧисло*3 Тогда
Сообщить("Ощутимо больше");

17.

• Иначе Сообщить("Менее чем в три раза");
КонецЕсли;
• ИначеЕсли ПервоеЧисло = ВтороеЧисло Тогда
Сообщить("Первое число равно второму");
• ИначеЕсли ПервоеЧисло < ВтороеЧисло Тогда
Сообщить("Первое число меньше второго");
• Если ПервоеЧисло <= ВтороеЧисло*10 Тогда
Сообщить("Причем намного меньше");
• ИначеЕсли ПервоеЧисло <= ВтороеЧисло*3 Тогда
Сообщить("Ощутимо меньше");
• Иначе Сообщить("Менее чем в три раза");
КонецЕсли;

18.

• Перем Номер; ВвестиЧисло(Номер, "Введите номер дня
недели");
• Если Номер=1 Тогда Сообщить ("понедельник");
ИначеЕсли Номер=2 Тогда Сообщить ("вторник");
ИначеЕсли Номер=3 Тогда Сообщить ("среда");
ИначеЕсли Номер=4 Тогда Сообщить ("четверг");
ИначеЕсли Номер=5 Тогда Сообщить ("пятница");
ИначеЕсли Номер=6 Тогда Сообщить ("суббота");
ИначеЕсли Номер=7 Тогда Сообщить ("воскресенье");
• Иначе Сообщить ("В неделе семь дней!");
• КонецЕсли; Если Номер=6 ИЛИ Номер=7 Тогда
• Сообщить ("это выходной день"); КонецЕсли;