Добро пожаловать к нам в гости! Наш сайт посвящён программе NeoBook, с помощью которой вы легко сможете создавать собственные мультимедиа-приложения без необходимости изучать сложные языки программирования! Зарегистрируйтесь, чтобы стать членом нашего сообщества.
Всемпривет,раскажите возможно ли складывать двух значьные числа между собой. Ну на пример число"55" сложить между собой "5+5"??? Ну недоходит до меня!!!!
но это уж совсем 1 класс он написал что сложить числа между собой, т.е. SetVar "[Number]" "583" ....... 5+8+3=16 .......... выяснелось, ему надо сложить между собой числа из даты, ппц Добавлено (08 Октябрь 2010, 10:17) --------------------------------------------- novichok, ты изначально не можешь изложить суть дела?! Надо сразу было писАть, что необходимо сложить числа из даты, т.к. надо добавить еще команду
Добавлено (08 Октябрь 2010, 10:19) --------------------------------------------- novichok, опять какой нить гороскоп-лохотрон?
Сообщение отредактировано Сергей - Пт, 08 Октября 2010, 10:18
SetVar "[sNumer]" "05.10.2010" .Переменая с датой StrReplace "[sNumer]" "." "" "[sNumer]" "" .Убиваем точки в дате, тем самым делаем числом StrLen "[sNumer]" "[nLen]" .Подсчитываем количество символов :povtor .метка линии SetVar "[sResult]" "0" .Обнуляем результат Loop "1" "[nLen]" "[i]" .Запускаем цикл SubStr "[sNumer]" "[i]" "1" "[sTemp]" .Извлекаем из чесла последовательно каждый символ Math "[sResult]+[sTemp]" "" "[sResult]" .Плюсуем между собой EndLoop .Если результат должен быть не десятком, то код далее..... StrLen "[sNumer]" "[nLen]" .Подсчитываем количество символов в результате If "[nLen]" ">" "1" .Если больше двух символов, т.е. десяток, то .делаем повтор расчета SetVar "[sNumer]" "[sResult]" GotoLine "povtor" .переход на метку EndIf
