![]() |
![]() |
|
Перевод отрицательного числа в положительное 8.1 ↓ (vde69 04.03.2009 15:11) |
☑ | ||
---|---|---|---|---|
0
dimon_ddv
04.03.09
✎
14:35
|
Напомните плиз как перевести отрицательное число в положительное в 8.1
Есть -100, а надо 100. Негде глянуть. |
|||
1
butterbean
04.03.09
✎
14:36
|
- или *(-1) :-)
|
|||
2
luns
04.03.09
✎
14:36
|
шо опять???
|
|||
3
Serg_1960
04.03.09
✎
14:37
|
А = -А;
опять :(( |
|||
4
Господин ПЖ
04.03.09
✎
14:37
|
даешь 200 постов
|
|||
5
H A D G E H O G s
04.03.09
✎
14:37
|
Род занятий Программист 1С
Достижения (опыт) написание партионного учета в версии 1С:Заказчик строительства 1.0 Интересы 1С v7.7 & v8.1 Жость |
|||
6
luns
04.03.09
✎
14:38
|
(5) Правда? 0_0
|
|||
7
dimon_ddv
04.03.09
✎
14:38
|
чего издеваетесь???
|
|||
8
Злопчинский
04.03.09
✎
14:38
|
(3) Решение неверное. Отсутствует проверка на допустимость входных значений переменной А. Итого: код "грязный", вероятность ошибки (неверной работы программы) очень велика. Садитесь, два!
|
|||
9
dimon_ddv
04.03.09
✎
14:39
|
туплю уже... спать пора, а я тут бля застрял со всякой...
|
|||
10
Mikle Shaman
04.03.09
✎
14:40
|
Дык вроде в 7.7. это делалось через функцию Макс()...
Почему в 8.1 надо делать по-другому? |
|||
11
H A D G E H O G s
04.03.09
✎
14:41
|
Макс(-А,А)
|
|||
12
dimon_ddv
04.03.09
✎
14:42
|
да просто по модулю -100 надо взять - функции такой не вижу в 8
|
|||
13
H A D G E H O G s
04.03.09
✎
14:42
|
(9) Какой спать ?? Еще восьми вечера нет.
|
|||
14
Serg_1960
04.03.09
✎
14:43
|
(8) На получи, враг народа :))
А = Число(СтрЗаменить(Формат(А,"ЧРД=.; ЧГ="),"-","")); |
|||
15
FanatToNight
04.03.09
✎
14:47
|
(9) - "спать пора" - ты из амерки постишь? :) тогда тебе вставать пора :)
если а<0 тады а=0-а; конецесли; // :) |
|||
16
FanatToNight
04.03.09
✎
14:48
|
насчет одноместных операций - не в курсе :)
|
|||
17
Я не курил
04.03.09
✎
14:48
|
А = -100; //входящее
пЧисло = 0; Для нн = 1 по Макс(-А,А) Цикл пЧисло = нн; КонецЦикла; |
|||
18
Рэйв
04.03.09
✎
14:48
|
:-)
Если ТипЗнч(А)=Тип("Число") Тогда А=Число(СтрЗаменить(Строка(А),"-","")); КонецЕсли; |
|||
19
FanatToNight
04.03.09
✎
14:50
|
блиннн.. :))
Пока 1=1 Цикл если а<0 тогда а=-а; КонецЕсли; прервать; конеццикла; |
|||
20
Новиков
04.03.09
✎
14:50
|
В копилке есть статья: "v8: Хитрые приемы программирования (трюки программистов)". Цитирую: "Многим программистам лень создавать функцию по вычислению модуля числа и они пишут: Макс(А,-А)".
(11) :) Ваши мысли, совпали с мыслями авторами статьи (Фиксин) :) |
|||
21
FanatToNight
04.03.09
✎
14:51
|
Макс(А,-А) и Макс(-А,А) - это абсолютно разные решения! не путайте, плз.. :)
|
|||
22
Рэйв
04.03.09
✎
14:54
|
Если Найти(Строка(А),"-")>0 Тогда
А=Число( Прав( Строка(А),СтрДлина(Строка(А)-1) ) ); КонецЕсли; |
|||
23
dimon_ddv
04.03.09
✎
14:54
|
(14) - что надо :) спасибо!!!
|
|||
24
Serg_1960
04.03.09
✎
14:55
|
А = ?(ТипЗнч(А)=Тип("Число"),Число(СтрЗаменить(Формат(А,"ЧРД=.; ЧГ="),"-","")),0);
(23) А я ещё умею крестиком вышивать :) |
|||
25
H A D G E H O G s
04.03.09
✎
15:00
|
(24) Фиг вам:
http://slil.ru/27020891 |
|||
26
H A D G E H O G s
04.03.09
✎
15:01
|
(24)
Объект=Новый ("addin.Absolute"); Рез=Объект.Модуль(-100); |
|||
27
НЕА123
04.03.09
✎
15:05
|
не надо ифы, максы и прочее. для целых
(('00010101'-А)-'00010101') + (('00010101'+А)-'00010101') |
|||
28
Mikle Shaman
04.03.09
✎
15:07
|
(26) Бест! :) :) :)
Скачал! P.S. Кстати, чтобы от этой ветки была хоть какая-то польза. Где бы почитать про создание DLL для чайников? |
|||
29
sam_sam
04.03.09
✎
15:10
|
я так делаю
?(А < 0,А * (-1),А) |
|||
30
NikVars
04.03.09
✎
15:12
|
||||
31
Лефмихалыч
04.03.09
✎
15:12
|
(0) мои пять копеег
Sqrt(Pow(А, 2)) |
|||
32
Immortal
04.03.09
✎
15:13
|
(26)ржувголос
|
|||
33
Serg_1960
04.03.09
✎
15:15
|
Сообщить("Ваше число - " + ?(СтрЧислоСтрок(СтрЗаменить(""+А,"-",Символы.ПС))=1,"не ","") + "отрицательное");
|
|||
34
Ц_У
04.03.09
✎
15:15
|
Модуль числа
Вот такой вот забавный способ получения модуля, не индийский, но довольно заковыристый: y = x*((x>0)-0,5)*2 Эквивалентно y = abs(x); Источник: http://habrahabr.ru/blogs/code_wtf/46196/#habracut |
|||
35
H A D G E H O G s
04.03.09
✎
15:15
|
(33) Слабак
|
|||
36
Fragster
гуру
04.03.09
✎
15:16
|
(0) баян рваный уже...
http://www.google.ru/search?as_sitesearch=forum.mista.ru&q=%EC%EE%E4%F3%EB%FC+%F |
|||
37
Mikle Shaman
04.03.09
✎
15:17
|
(30) А теперь из этой кучи хоть одну полезную ссылку покажите?
|
|||
38
sam_sam
04.03.09
✎
15:23
|
Чего то вдяй разбушевался. Налево пойдет ветку закроет, направо пойдет опустит. И молчит как партизан. -1 в чем дело?
|
|||
39
Salvador Limones
04.03.09
✎
15:47
|
(38) Упоролся этот наркоман в хлам!
|
|||
40
NikVars
04.03.09
✎
20:46
|
(37) Первая ссылка.
Microsoft Visual Basic 2005 для "чайников" Эта книга представляет собой отличное руководство для начинающих программистов на Visual Basic 2005 и новичков в .NET. В книге описывается широкий диапазон полезных аспектов Visual Basic 2005, а также пользовательский интерфейс Visual Studio 2005. Здесь рассматриваются не только основы программирования — использование циклов, логических операторов, работа с типами данных в Visual Basic — но и общие принципы разработки программной логики и пользовательского интерфейса. Примеры кода в книге помогают на практике воспользоваться описанными методиками разработки программ. В книге также рассматривается создание и отладка различных типов проектов: Windows-приложений, Web-сайтов, созданных на базе ASP.NET, Web-служб, а также DLL-библиотек. |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |