[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. for /l %%a in (1,1,100) do (
  4. for /l %%b in (%%a,1,100) do (
  5. for /l %%c in (%%b,1,100) do (
  6. set /a aa=%%a*%%a+%%b*%%b
  7. set /a ab=%%c*%%c
  8. if !aa!==!ab! echo %%a %%b %%c
  9. )
  10. )
  11. )
  12. echo.&pause
复制代码

TOP

上面的代码算的不够全面.

[ 本帖最后由 foxJL 于 2008-3-23 15:48 编辑 ]

TOP

  1. @echo off
  2. set x=1
  3. set /p max=打印出多少以内的勾股弦组合(勾^>3):
  4. :x
  5. set /a x+=2,s=x*x,y=s/2,z=y+1
  6. echo %x%,%y%,%z%
  7. if %x% lss %max% goto x
  8. pause
复制代码

TOP

返回列表