中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客注册登录会员网志搜索命令提示符 Bash 上传统计

中国DOS联盟论坛
现在时间是 2026-08-07 23:34

欢迎新会员 Atticus97　 RSS
共 48,041 主题排行 / 350,128 发帖 / 今日 3 篇 / 48,252 会员排行不转换/ 简体中文/ 繁體中文（台灣）/ 繁體中文（香港）

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 批处理再现九九乘法表查看 967　回复 8

楼主 批处理再现九九乘法表发表于 2008-04-04 21:14　·　中国湖南株洲电信

bat-zw

金牌会员

★★★★

永远的学习者

积分 3,105
发帖 1,276
注册 2008-03-08 13:00
18年会员
UID 112398
性别男

状态离线

　　今天听到小女儿在背颂九九乘法口诀，突然就荫生了用批处理制作九九乘法表的念头，多少也找回点童年的记忆（为了排版整齐，在一位数前都加了0）。

@echo off

for /l %%i in (1,1,9) do set str= &call :lp %%i

pause&goto :eof 

:lp

cd. >temp.txt

for /l %%i in (1,1,10) do (

    set a=%1&set b=%%i

    set /p str=<temp.txt

    setlocal enabledelayedexpansion

    set /a c=!a!*!b!

    if !c! gtr 9  (echo !str!0!a!*0!b!=!c! >temp.txt) else (echo !str!0!a!*0!b!=0!c! >temp.txt)

    if !b! gtr !a! echo !str!&del temp.txt /q&goto :eof

    endlocal

)

[ Last edited by zw19750516 on 2008-4-4 at 09:23 PM ]

本帖最近评分记录（共 1 条）点击查看详情

评分人	分数	时间
Climbing	+10	2008-04-04 22:21

批处理之家新域名：www.bathome.net

第 2 楼发表于 2008-04-04 22:30　·　中国陕西西安电信

plp626

银牌会员

★★★★

钻石会员

积分 2,278
发帖 1,020
注册 2007-11-19 13:34
18年会员
UID 103127
性别男

状态离线

转,学习下:

@ECHO  OFF

SETLOCAL ENABLEDELAYEDEXPANSION

for /l %%i in (1,1,9) do (

      for /l %%j in (1,1,%%i) do (

      set /a h=%%i*%%j

      set /p=%%i×%%j^=!h!	<nul

      if %%i==%%j echo.

      )

)

pause

山外有山，人外有人；低调做人，努力做事。

进入网盘(各种工具)~~ 空间~~cmd学习

第 3 楼发表于 2008-04-05 00:03　·　中国湖南株洲电信

bat-zw

金牌会员

★★★★

永远的学习者

积分 3,105
发帖 1,276
注册 2008-03-08 13:00
18年会员
UID 112398
性别男

状态离线

Originally posted by plp626 at 2008-4-4 22:30:
转,学习下:

@ECHO  OFF

SETLOCAL ENABLEDELAYEDEXPANSION

for /l %%i in (1,1,9) do (

      for /l %%j in (1,1,%%i) do (

      set /a h=%%i*%%j

      set /p=%%i×%%j^=!h!	<nul

     ...



代码好简洁，但排版有大问题。

批处理之家新域名：www.bathome.net

第 4 楼发表于 2008-04-05 00:39　·　中国江苏常州溧阳市电信

terse

银牌会员

★★★

积分 2,404
发帖 946
注册 2005-09-08 13:44
20年会员
UID 42345

状态离线

我也转一个排版没问题吧
@echo off&setlocal enabledelayedexpansion
for /l %%a in (1,1,9) do (
for /l %%b in (1,1,%%a) do (
set /a i+=1
set /a ans=%%a*%%b
set ans=%%b×%%a=!ans!
set res=!res! !ans:~0,6!
if !i! equ %%a echo!res!&set res=& set i=0
)
)
pause

简单!简单!再简单!

第 5 楼发表于 2008-04-05 01:50　·　中国湖南娄底电信

26933062

银牌会员

★★★

积分 2,268
发帖 879
注册 2006-12-19 16:23
19年会员
UID 73968
性别男

状态离线

2楼的排版问题是因为论坛处理不了tab键。
将set /p=%%i×%%j^=!h! <nul 这里的“空格”换成tab就美观了。
用空格来处理也可以，只是代码稍微长一点。
如下。



@echo off&setlocal EnableDelayedExpansion

for /l %%i in (1,1,9) do (

  for /l %%j in (1,1,%%i) do (

  set /a h=%%i*%%j

  set "h=!h!  "

  if %%j equ 1 (set h=!h:~0,2!) else (set h=!h:~0,3!)

  set /p=%%j×%%i^=!h!<nul

)

  echo.

)

pause

[ Last edited by 26933062 on 2008-4-5 at 02:12 AM ]

致精致简！

第 6 楼发表于 2008-04-05 02:02　·　中国湖南娄底电信

26933062

银牌会员

★★★

积分 2,268
发帖 879
注册 2006-12-19 16:23
19年会员
UID 73968
性别男

状态离线

4楼代码更好，也可以更简化
:



@echo off&setlocal enabledelayedexpansion

for /l %%a in (1,1,9) do (

     for /l %%b in (1,1,%%a) do (

     set /a h=%%a*%%b

     set "h=%%b×%%a=!h! "

     set m=!m! !h:~0,6!

    )

	echo !m!&set "m="

)

pause

致精致简！

第 7 楼发表于 2008-04-05 03:51　·　中国江苏常州溧阳市电信

terse

银牌会员

★★★

积分 2,404
发帖 946
注册 2005-09-08 13:44
20年会员
UID 42345

状态离线

Originally posted by 26933062 at 2008-4-5 02:02:
4楼代码更好，也可以更简化
:
@echo off&setlocal enabledelayedexpansion

for /l %%a in (1,1,9) do (

     for /l %%b in (1,1,%%a) do (

     set /a h=%%a*%%b

     set "h ... 



26933062兄的提醒  原来也可以这样  哈~



@echo off&setlocal enabledelayedexpansion

for /l %%a in (1,1,9) do (

     for /l %%b in (1,1,%%a) do (

     set /a h=%%a*%%b

     set "h=!h! "

     set /p=%%b×%%a=!h:~0,2! <nul

    )

    echo.

   )

pause

简单!简单!再简单!

第 8 楼发表于 2008-04-05 09:49　·　中国湖北武汉电信

aliang10520

初级用户

★

积分 47
发帖 24
注册 2008-03-12 23:44
18年会员
UID 112802
性别男

状态离线

不错

第 9 楼发表于 2008-04-07 19:06　·　中国甘肃兰州电信

xtanbmy

初级用户

★

积分 47
发帖 31
注册 2008-03-17 19:04
18年会员
UID 113236
性别男

状态离线

哈哈，不错。

可打印版本 | 订阅主题 | 收藏主题

论坛跳转: