- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
- 28
- 29
- 30
- 31
- 32
- 33
Функция ЧерезНоль(Значность) Экспорт
Оборот=10;
Если Значность=2 Тогда
Оборот=100;
ИначеЕсли Значность=3 Тогда
Оборот=1000
ИначеЕсли Значность=4 Тогда
Оборот=10000
ИначеЕсли Значность=5 Тогда
Оборот=100000
ИначеЕсли Значность=6 Тогда
Оборот=1000000
ИначеЕсли Значность=7 Тогда
Оборот=10000000
ИначеЕсли Значность=8 Тогда
Оборот=100000000
ИначеЕсли Значность=9 Тогда
Оборот=1000000000
ИначеЕсли Значность=10 Тогда
Оборот=10000000000
ИначеЕсли Значность=11 Тогда
Оборот=100000000000
ИначеЕсли Значность=12 Тогда
Оборот=1000000000000
ИначеЕсли Значность=13 Тогда
Оборот=10000000000000
ИначеЕсли Значность=14 Тогда
Оборот=100000000000000
ИначеЕсли Значность=15 Тогда
Оборот=1000000000000000
КонецЕсли;
Возврат Оборот
КонецФункции
bormand 13.06.2012 13:29 # +1
dmurdoc 13.06.2012 13:31 # +1
santa_microbe 13.06.2012 13:42 # +2
bormand 13.06.2012 13:45 # +2
vistefan 13.06.2012 15:16 # +2
:(
santa_microbe 13.06.2012 15:49 # +5
vistefan 13.06.2012 15:18 # +2
Хуже было бы только если бы не ИначеЕсли а тупые независимые Если с лишними пятнадцатью проверками в "лучшем случае"...
sergeante 13.06.2012 15:51 # +2
гы;)
bormand 13.06.2012 15:58 # +3
vistefan 13.06.2012 16:00 # +2
TarasB 13.06.2012 16:00 # −1
bormand 13.06.2012 16:08 # +2
defecate-plusplus 13.06.2012 16:08 # +3
bormand 13.06.2012 16:10 # 0
TarasB 13.06.2012 16:19 # +3
dmurdoc 13.06.2012 16:22 # −4
и можно даже не выносить в отдельную функцию)
bormand 13.06.2012 16:26 # 0
dmurdoc 14.06.2012 09:28 # +1
sergeante 14.06.2012 09:21 # +2
Steve_Brown 14.06.2012 09:45 # +2
eth0 14.06.2012 14:17 # +1
defecate-plusplus 14.06.2012 14:23 # +2
eth0 14.06.2012 14:59 # +1
Lure Of Chaos 13.06.2012 23:24 # +1
mrbus 19.06.2012 15:12 # 0
Цикл - это коротко, но долго :)
Мы ж тут реалтайм системный драйвер разрабатываем и 1С для этого самое оно :)
eth0 19.06.2012 16:46 # +3
Второе, что роднит эту платформу с PHP - отсутствие вменяемых специалистов, да даже людей, банально знакомых с базовыми структурами данных, логикой и алгоритмами. Некоторые из них удивляются, например, теореме де Моргана. Не слышал человек никогда и всё тут.
mrbus 19.06.2012 19:22 # 0
Связь с внешним миром: файлы, почта, XML (как DOM и последовательная запись/чтение), XDTO, FastInfoset, HTML, Web-сервисы, Интернет-соединение (т. е. HTTP GET/POST методы), COM/OLE-объекты (в качестве клиента и сервера), ActiveX, работа с двоичными данными, сжатие ZIP, работа с XBase (DBF-файлы);
Структуры данных: массивы, структуры, таблицы значений с произвольными индексами;
Сериализация практически всех объектов;
Диаграммы, графические схемы, географические схемы;
Криптография;
Даже такие фишки из матстатистики, как анализ данных (а именно: кластерный анализ, дерево решений, поиск ассоциаций и др.), которыми, правда, никто не пользуется - во всяком случае, практического применения я не встречал ни разу.
Неужели это слабенький функционал для специализированной (считай, ERP) системы, ориентированной на учетную деятельность? Поверьте, в бухучете нигде синусы и тензорное исчисление не встречаются :)
Мне лично кажется, фишки, связанные с окнами, процессами и прочая байда из 1С++ - нетипично для такой системы и неудивительно, что это реализуется как допфункционал через COM-объекты или внешние компоненты.
mrbus 19.06.2012 19:34 # +1
А со вторым абзацем согласен, толковых специалистов нет. Хотя я уже не уверен, что это связано именно с 1С.
В пятницу в нашей группе компаний прошел конкурс профмастерства. Я и наш отдел работаем чисто на 1С, но организаторы решили, что языками будут по выбору C# или Java. Представьте себе парней из других отделов, которые всю жизнь кодят на C# и Java, и меня, который с C# знаком довольно слабенько. Но из 15 участников я почему-то заимел I место. Что я могу сказать об этих "специалистах" на этом фоне? Да ничего хорошего... Не говоря о понятии "связность графа", ребята даже не сообразили отсортировать в нужном месте...
bormand 19.06.2012 20:39 # +1
Их объединяет низкий порог вхождения.
Чем ниже порог вхождения - тем больше быдлокодеров пытается работать с платформой... Хорошие специалисты есть и в PHP и в 1С и в Delphi и даже в VB, но они, к сожалению, теряются среди толп мартышек, которые считают себя "крутыми программистами".
eth0 20.06.2012 21:04 # 0
> XDTO, FastInfoset, HTML, Web-сервисы, Интернет-соединение
Восьмёрка, не?
> COM/OLE-объекты
Невелика радость.
> Диаграммы, графические схемы, географические схемы;
Точно восьмёрка. Только вот кто бы на неё ещё переходил.
> Криптография;
Сертифицированная ФАПСИ only™? Я просто не в курсе, как оно там.
> считай, ERP
Многие сумневаются, считая, что это ни разу не ерп. Так, что-то среднее между автоматизацией склада ларька и гаража. У меня не было опыта работы с восьмёркой, по нулям ваще, но я читал треды в разных форумах. Там эти самые добрые люди пишут, что если на предприятии более десяти-пятнадцати активных пользователей, то оно будет безбжно тупить, а если у кого-то работает, то только за счёт безумных затрат и чёрной магеи. Пруфов не будет, сам я не проверял. Но, почему-то упорно советую для ерп парусы-галактики (наверное, интеграторы-суки, маскируются под честных людей).
> с древней версией типа 7.7
Ja, ja. В трезвом уме и здравой памяти никто из моего ближайшего окружения на восьмёрку не перейдёт.
/* ***************** */
> Их объединяет низкий порог вхождения.
Вечно забываю и путаю причину со следствием. C другой стороны, мне кажется, симбиоз "человек-платформа" идеален. Кодеры заслуживают эту платформу, а платформа - кодеров. Anyway, ничего для перелома ситуации не делают, эксперимент "каждая домохозяйка может программировать на бейсике" успешно провален, а переносимости кода меж версиями всё равно нет. Штат "специалистов" вполне можно выкинуть на помойку и начать с нуля, нечто красивое. Жаль, в этой реальности работает иначе.
Трактор 16.07.2012 15:40 # 0
Я чорный маг!!!! 60 пользователей в базе и без счёта клиентов с сайта через веб сервис.
bormand 16.07.2012 16:03 # 0
Ну это уже не чорный маг, а самый настоящий Чорный Властелин...
Если не секрет - сколько из этих 60 пользователей активно работают с базой, а не заполняют десяток документов в день?
Трактор 16.07.2012 21:12 # 0
guest 15.09.2012 03:41 # 0
> Ja, ja. В трезвом уме и здравой памяти никто из моего ближайшего окружения на восьмёрку не перейдёт.
Хуита в кубе. Поцык не в теме абсолютно и высказывает людям своё "мнение".
guest 27.07.2012 21:05 # +1
для ускорения, можно кмнжоать по степеням 2-ки
Cthulhu 16.09.2012 14:14 # 0
в один оператор же: Число(СтрЗаменить(Формат("1","С"+Значнос ть)," ","0"))
bormand 16.09.2012 14:49 # +1
В нормальных языках за такое решение к стенке бы поставили...
Но в 1с, к сожалению, оно скорее всего будет работать быстрее цикла, а вменяемых альтернатив в духе Степень(10, Значность) все равно нет.