标题: [原创]*****九九乘法表***** [打印本页]
作者: s11ss 时间: 2007-9-23 21:21 标题: [原创]*****九九乘法表*****
@echo off
setlocal enabledelayedexpansion
::::::::::::::::::::::: 九九乘法表 :::::::::::::::::::::::
::::::::::::::::::::::: {2007-9-23 s11ss} :::::::::::::::::::::::
set/a i=1
:i
if !i! lss 10 (
set/a j=1
set str=
:j
if !j! leq !i! (
set/a m=!i!*!j!
set empty=
if !j! equ 2 (
if !i! equ 3 (
set empty=
)
if !i! equ 4 (
set empty=
)
)
set str=!str! !j!×!i!＝!m!!empty!
set/a j+=1
goto :j
)
echo !str!
set/a i+=1
goto :i
)
echo Press Any Key To Exit...
pause>nul
setlocal enabledelayedexpansion
::::::::::::::::::::::: 九九乘法表 :::::::::::::::::::::::
::::::::::::::::::::::: {2007-9-23 s11ss} :::::::::::::::::::::::
set/a i=1
:i
if !i! lss 10 (
set/a j=1
set str=
:j
if !j! leq !i! (
set/a m=!i!*!j!
set empty=
if !j! equ 2 (
if !i! equ 3 (
set empty=
)
if !i! equ 4 (
set empty=
)
)
set str=!str! !j!×!i!＝!m!!empty!
set/a j+=1
goto :j
)
echo !str!
set/a i+=1
goto :i
)
echo Press Any Key To Exit...
pause>nul
作者: dosmania 时间: 2007-9-23 21:41
牛X，不错效率比namejm写过的那个高多了
加分
作者: lzmuhioin 时间: 2007-9-23 22:40
强人.我先运行试试看
作者: dosmania 时间: 2007-9-24 15:05
s11ss 有兴趣研究一下这帖子吖
http://www.cn-dos.net/forum/viewthread.php?tid=33747&fpage=1
作者: yoyodos 时间: 2007-9-24 15:21
我有空好好看看：）
作者: youxi01 时间: 2007-9-24 19:55
从代码“健康”的角度来看，未见得是一段好程序！！
@echo off & setlocal enabledelayedexpansion
for /l %%i in (1 1 9) do (
for /l %%j in (1 1 %%i) do (
set/a var=%%j*%%i
set /p=%%j×%%i=!var! <nul
)
echo.
)
pause>nul
for /l %%i in (1 1 9) do (
for /l %%j in (1 1 %%i) do (
set/a var=%%j*%%i
set /p=%%j×%%i=!var! <nul
)
echo.
)
pause>nul