taofan712

@echo off
setlocal enabledelayedexpansion
:LOOP
set/a H=8+%random%%%2
if %H% equ 8 (set/a M=30+%random%%%30) else (set/a M=%random%%%31)
set/a S=%random%%%60,MS=%random%%%60
CALL :help %H% %M% %S% %MS%

set/a H=11+%random%%%2
if %H% equ 11 (set/a M=30+%random%%%30) else (set/a M=%random%%%31)
set/a S=%random%%%60,MS=%random%%%60
CALL :help %H% %M% %S% %MS%

set/a H=14
set/a M=%random%%%30,S=%random%%%60,MS=%random%%%60
CALL :help %H% %M% %S% %MS%

set/a H=17+%random%%%2
if %H% equ 17 (set/a M=30+%random%%%30) else (set/a M=%random%%%31)
set/a S=%random%%%60,MS=%random%%%60
CALL :help %H% %M% %S% %MS%

PAUSE
GOTO LOOP

:help
set/a n=0
for %%a in (%1 %2 %3 %4) do (
    set var=00%%a:
    set/a n+=1
    if !n! equ 4 (set var=!var:~-3,-1!) else (set var=!var:~-3!)
    set/p tp=!var!<nul
)
echo;
:eof
复制代码

啧啧啧，挺有意思的一个题目，我却没有巧妙思路，也是无趣。