| Server IP : 134.29.175.74 / Your IP : 216.73.216.160 Web Server : nginx/1.10.2 System : Windows NT CST-WEBSERVER 10.0 build 19045 (Windows 10) i586 User : Administrator ( 0) PHP Version : 7.1.0 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : OFF | Perl : OFF | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : C:/nginx/html/JimMartinson/_Archive/CST1861/CST1861/Archive/2010.04.19/ |
Upload File : |
@echo off :: fraction.cmd :: Written by: Jim Martinson :: Written on: 2010/04/19 :: Test if command line extensions are enabled. if "%~1"=="~1" goto:ExtensionsAreNotEnabled :: Display help when the /? parameter is passed. if NOT "%~1"=="/?" goto SkipHelp :Help :: Display help. echo Finds out if a number is evenly divisable by another. echo Will check for 2-9. echo. ::echo Usage: %~n0 number divisor echo Usage: %~n0 number echo. echo number = The number to divide by. ::echo divisor = The number to use as the divisor. echo. goto:EOF :ExtensionsAreNotEnabled echo Command line extensions are not enabled. They must be enabled for %~n0 to work properly. echo %~n0 aborted. echo. goto:Help :SkipHelp set _number=%1 :: Test to see if the number is legal. set /a _test=_number+1 set /a _test=_test-1 if NOT %_test%==%_number% ( echo %_number% is out of the range 2147483647 to -2147483648. ) set _isDiv= FOR /L %%d IN (2,1,9) DO ( set _divisor=%%d call:isDivisable ) if NOT defined _isDiv echo %_number% is NOT evenly divisable by any divisor. goto:EOF :isDivisable :: Any number is evenly disable if: :: If int(number/divisor)*divisor = number then it is equally divisable. set /a _result = _number/_divisor set /a _testEven = _result * _divisor if %_testEven%==%_number% ( echo %_number% is evenly divisable by %_divisor%. set _isDiv=1 ) goto:EOF