Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Скриптовые языки администрирования Windows (http://forum.oszone.net/forumdisplay.php?f=102)
-   -   [решено] Преобразование строки в простое число CMD/BAT (http://forum.oszone.net/showthread.php?t=259450)

kelevara 26-04-2013 15:07 2139992

Преобразование строки в простое число CMD/BAT
 
Добрый день!
При вводе с клавиатуры значения переменной с помощью set /p полученное значение имеет тип Строка, правильно? Можно ли это значение сделать простым числом, чтобы в дальнейшем проводить над ним математические операции?

Anonymоus 26-04-2013 15:53 2140025

В bat нету разграничения по типам переменных. Всё зависит от того, как вы с ними работаете. Математические операции над значением переменной можно проводить с помощью Set /A (обратитесь к встроенной справке за подробностями), если одно или все значения - нечисловые - они игнорируются (считаются нулём). Принудительно указать тип числа для Set /A можно добавив перед ним 0x (для шестнадцатеричных) или 0 (для восьмеричных).

kelevara 26-04-2013 16:02 2140034

Цитата:

Цитата Anonymоus
В bat нету разграничения по типам переменных. Всё зависит от того, как вы с ними работаете. Математические операции над значением переменной можно проводить с помощью Set /A (обратитесь к встроенной справке за подробностями), если одно или все значения - нечисловые - они игнорируются (считаются нулём). Принудительно указать тип числа для Set /A можно добавив перед ним 0x (для шестнадцатеричных) или 0 (для восьмеричных). »

Ммм, тогда не ясно, как быть в таком случае. Есть задача - определить факториал введенного с клавиатуры числа. В самой программе для этого нужно использовать For /L. Также нужно предусмотреть проверки на ввод отрицательного числа и на ввод значений, превышающих максимально допустимые величины. Я написал вот такой скрипт:

Код:

::@echo off
set /a c = 1
set /p h = "Vvedite chislo, faktorial kotorogo neobhodimo vichislit: "
::set /a b = -12
if %b% lss 0 goto minus
for /L %%a in (1, 1, %b%) do set /a c = c * %%a
if %c% gtr 2147483647 goto mnogo
echo %c%
:minus
echo vvedeno otricatelnoe chislo
goto vihod
:mnogo
echo previsheno ogranichenie
goto vihod
:vihod
pause

В таком вариант он не работает. А если раскомментировать строку ::set /a b = -12, а предыдущую наоборот закомментировать, то все прекрасно получается.

Anonymоus 26-04-2013 16:40 2140062

Работающий вариант. Я постарался прокомментировать код, но если что непонятно будет - спрашивайте.
Код:

@Echo Off
SetLocal EnableDelayedExpansion

:: Запрашиваем данные у юзера
Set /P Value=Enter a number:^>

:: Проверка введённых данных
Echo %Value%|Findstr /R "[0-9]">Nul||(Echo Only numeric value accepted&Pause&Exit)
If %Value% LSS 0 (Echo Error: negative value&Pause&Exit)
If %Value% GEQ 2147483648 (Echo Error: out of acceptable range&Pause&Exit)

:: Считаем факториал. В связи с ограничениями арифметики в cmd, факториал считается до 16 включительно
Set Result=1
For /L %%A In (1,1,%Value%) Do (
        Set /A Result=!Result!*%%A
        If !Result! GEQ 2147483648 (Echo Error: variable overflow&Pause&Exit)
)

:: Отключаем расширенную обработку для вывода восклицательного знака
SetLocal DisableDelayedExpansion
Echo %Value%! = %Result%
Pause


kelevara 26-04-2013 16:46 2140064

Цитата:

Цитата Anonymоus
Echo %Value%|Findstr /R "[0-9]">Nul|| »

Огромное спасибо! Все понял кроме этой строки. Тут проверяется на то, число ли это введено?

Anonymоus 26-04-2013 16:51 2140068

Цитата:

Цитата kelevara
Тут проверяется на то, число ли это введено? »

Скорее на то, есть ли во введённых данных хоть одна цифра. Если цифр нету, выводит ошибку. Но у этого подхода есть и свой недостаток - он отловит во входящих данных строку вида "fgsfds", но пропустит "fgs123fds"
Небольшое исправление, замените
Код:

Echo %Value%|Findstr /R "[0-9]">Nul||(Echo Only numeric value accepted&Pause&Exit)
на
Код:

Echo %Value%|Findstr /R "[^0-9]">Nul&&(Echo Only numeric value accepted&Pause&Exit)
Теперь любое не-число вызовет появление ошибки.

Iska 26-04-2013 16:52 2140069

Цитата:

Цитата Anonymоus
Код:

Echo %Value%|Findstr /R "[^0-9]">Nul||(…)
If %Value% LSS 0 (Echo Error: negative value&Pause&Exit)

»

А минус дойдёт теперь до проверки «If %Value% LSS 0 …»?

Anonymоus 26-04-2013 16:55 2140071

Iska, вы правы. Стоит поменять очерёдность проверок на
Код:

:: Проверка введённых данных
If %Value% LSS 0 (Echo Error: negative value&Pause&Exit)
Echo %Value%|Findstr /R "[^0-9]">Nul&&(Echo Only numeric value accepted&Pause&Exit)
If %Value% GEQ 2147483648 (Echo Error: out of acceptable range&Pause&Exit)



Время: 07:11.

Время: 07:11.
© OSzone.net 2001-