12
返回列表 发帖
batman

Rank: 8Rank: 8

帖子
2702 
积分
14562 
技术
177  
捐助
630  
注册时间
2008-6-16 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2008-8-9 22:51 | 只看该作者

【练习-011】批处理按要求将字符串分段输出

一、要求用批处理随机输出200个字符到1.txt中的一行，内容类同如下：
xh45q3ma+remgofm54sevhrna4g5r8pl9cjardezqjwj3m8itamh0a4itzd6jz8cmrfmibmhr0wmccyb8qnp2qh4rvlwff6yr2ez4eo063u6viy7ppw+nzxaxe8vrm190eei_0dwx5e2kxbds-ae6e96c9_i9glw8mz+uf6uienx9od8bktfnjlwlqu-e1rcj33_+4bzCOPY
二、要求用批处理将1.txt中的内容按10个字符为一段输出如下面两种形式：
在一行内输出：
xh45q3ma+r emgofm54se vhrna4g5r8 pl9cjardez qjwj3m8ita mh0a4itzd6 jz8cmrfmib mhr
0wmccyb 8qnp2qh4rv lwff6yr2ez 4eo063u6vi y7ppw+nzxa xe8vrm190e ei_0dwx5e2 kxbds-
ae6e 96c9_i9glw 8mz+uf6uie nx9od8bktf njlwlqu-e1 rcj33_+4bzCOPY
分行输出：
xh45q3ma+r
emgofm54se
vhrna4g5r8
pl9cjardez
qjwj3m8ita
mh0a4itzd6
jz8cmrfmib
mhr0wmccyb
8qnp2qh4rv
lwff6yr2ez
4eo063u6vi
y7ppw+nzxa
xe8vrm190e
ei_0dwx5e2
kxbds-ae6e
96c9_i9glw
8mz+uf6uie
nx9od8bktf
njlwlqu-e1
rcj33_+4bzCOPY
----------------------------------------------------------------------------------------------------------------------------------------------------
要求：代码高效、通用、简洁、不产生临时文件
ps:请老手们将本题留给新手完成

[ 本帖最后由 batman 于 2008-8-9 22:54 编辑 ]
收藏 分享
＊＊＊共同提高＊＊＊

youxi01

Rank: 8Rank: 8

帖子
962 
积分
2449 
技术
40  
捐助
0  
注册时间
2007-10-25 
2楼
发表于 2008-8-10 00:35 | 只看该作者
还有个细节问题：
产生的随机字符在什么范围内（主要包括哪些字符）？

TOP

more

Rank: 7Rank: 7Rank: 7

帖子
175 
积分
862 
技术
8  
捐助
0  
注册时间
2008-3-23 
3楼
发表于 2008-8-10 11:25 | 只看该作者
来赚一点儿积分,哈哈
@echo off
Setlocal Enabledelayedexpansion
set "str=abcdefghijklmnopqrstuvwxyz1234567890+-_"
for /l %%a in (1 1 200) do (
   set /a "m=!random!%%39"
   call set "var1=%%var1%%%%str:~!m!,1%%"
)
set "var=%var1%"
for /l %%a in (1 1 20) do (
   set "var2=!var:~,10!"
   set /p =!var2! <NUL
   set "var=!var:~10!"
)
echo.&echo.&set "var=%var1%"
for /l %%a in (1 1 20) do (
   set "var2=!var:~,10!"
   echo.!var2!
   set "var=!var:~10!"
)
pause>nul

[ 本帖最后由 more 于 2008-8-10 11:27 编辑 ]
1

评分人数

    • batman: 随然不是新手，还是要加分鼓励了。PB + 3

TOP

batman

Rank: 8Rank: 8

帖子
2702 
积分
14562 
技术
177  
捐助
630  
注册时间
2008-6-16 
4楼
发表于 2008-8-10 11:29 | 只看该作者
原帖由 youxi01 于 2008-8-10 00:35 发表
还有个细节问题：
产生的随机字符在什么范围内（主要包括哪些字符）？

只要是字符就可以，当然可以不考虑特殊字符问题了。
＊＊＊共同提高＊＊＊

TOP

shqf

Rank: 5Rank: 5

帖子
88 
积分
603 
技术
5  
捐助
0  
注册时间
2008-8-1 
5楼
发表于 2008-8-10 12:52 | 只看该作者 
@echo off
set /p str=<1.txt
set /p select=1.一行内分节显示　2.分行显示(请选择1-2)：
if %select% equ 2　goto fh
 
:fj
set /p=%str:~,10% <nul
if not "%str:~10%"=="" (set str=%str:~10%&goto fj)
pause>nul&goto end
 
:fh
echo %str:~,10%
if not "%str:~10%"=="" (set str=%str:~10%&goto fh)
pause>nulCOPY
2

评分人数

TOP

batman

Rank: 8Rank: 8

帖子
2702 
积分
14562 
技术
177  
捐助
630  
注册时间
2008-6-16 
6楼
发表于 2008-8-10 13:51 | 只看该作者
pause>nul&goto end
这句会出错的，应该改成pause>nul&goto :eof或pause>nul&exit
＊＊＊共同提高＊＊＊

TOP

shqf

Rank: 5Rank: 5

帖子
88 
积分
603 
技术
5  
捐助
0  
注册时间
2008-8-1 
7楼
发表于 2008-8-10 14:48 | 只看该作者
哦，你的写法规范。不过我这样也不出错呀：goto后面的标签没有定义的话，转至文件尾。

TOP

pusofalse

Rank: 8Rank: 8

帖子
1166 
积分
5174 
技术
13  
捐助
0  
注册时间
2008-3-11 
8楼
发表于 2008-8-10 15:03 | 只看该作者

回复 7楼 的帖子

不是转至文件尾部吧，而是找不到标签而出错，会自动退出，虽然都是退出。
心绪平和，眼藏静谧。

TOP

batman

Rank: 8Rank: 8

帖子
2702 
积分
14562 
技术
177  
捐助
630  
注册时间
2008-6-16 
9楼
发表于 2008-8-11 22:58 | 只看该作者
原帖由 shqf 于 2008-8-10 12:52 发表
@echo off
set /p str=nul

我认为此贴不能加分，原因如下：
一、书写不规范，不能加分。
二、第一问被略过，不能加分。
三、有错不改，不能加分。
＊＊＊共同提高＊＊＊

TOP

batman

Rank: 8Rank: 8

帖子
2702 
积分
14562 
技术
177  
捐助
630  
注册时间
2008-6-16 
10楼
发表于 2008-8-11 22:59 | 只看该作者
在本人未给出答案前，各位新人都可来一试下身手，本人将视情况一一评述和加分。
＊＊＊共同提高＊＊＊

TOP

null

Rank: 4

帖子
48 
积分
316 
技术
0  
捐助
0  
注册时间
2008-8-1 
11楼
发表于 2008-8-11 23:28 | 只看该作者
为什么我在看到类似问题的时候会感觉无从下手呢？

TOP

pusofalse

Rank: 8Rank: 8

帖子
1166 
积分
5174 
技术
13  
捐助
0  
注册时间
2008-3-11 
12楼
发表于 2008-8-11 23:35 | 只看该作者

回复 11楼 的帖子

勇于迈出第一步，解答出此题，你会觉得自己的批处理水平已经上升了一个台阶。
然后，你会越来越喜爱批处理。
set var=123456789
set s=!var:~%n%,1!
这里少了一句给n赋值的语句，%n%为一个小于9的随机数，为何是小于9，因为大于或等于9之后，%var:~9,1%是个空值了。
然后呢，请自己完成。^_^
心绪平和，眼藏静谧。

TOP

terse

Rank: 8Rank: 8

帖子
2339 
积分
9739 
技术
475  
捐助
0  
注册时间
2008-2-25 
13楼
发表于 2008-8-12 00:57 | 只看该作者
我也要分
那里错了 原码都改没了
@echo off&Setlocal Enabledelayedexpansion
     set "str=abcdefghijklmnopqrstuvwxyz1234567890+-_"
     for /l %%i in (1 1 200) do set /a "m=!random!%%39" & call set /p=%%str:~!m!,1%%<nul>>1.txt
     set/p str=<1.txt
     for /l %%i in (1 1 20) do call set /p=%%str:~!n!,10%% <nul&call set "%%i=%%str:~!n!,10%%"&set/a n+=10
     echo.
     for /l %%i in (1 1 20) do echo.!%%i!
     pause>nulCOPY
第一次上的码没了 不知道错在那里
@echo off&Setlocal Enabledelayedexpansion
     set "var=abcdefghijklmnopqrstuvwxyz1234567890+-_"
     for /l %%i in (1 1 200) do set /a "m=!random!%%39"&call set str=!str!%%var:~!m!,1%%
     >1.txt echo %str%
     for /l %%i in (1 1 20) do set /p=!str:~,10! <nul&set "%%i=!str:~,10!"&set "str=!str:~10!"
     echo.
     for /l %%i in (1 1 20) do echo.!%%i!
     pause>nulCOPY

[ 本帖最后由 terse 于 2008-8-12 14:49 编辑 ]
1

评分人数

TOP

batman

Rank: 8Rank: 8

帖子
2702 
积分
14562 
技术
177  
捐助
630  
注册时间
2008-6-16 
14楼
发表于 2008-8-12 09:48 | 只看该作者
原帖由 terse 于 2008-8-12 00:57 发表
我也要分
@echo off&Setlocal Enabledelayedexpansion
     set "var=abcdefghijklmnopqrstuvwxyz1234567890+-_"
     for /l %%i in (1 1 2000) do set /a "m=!random!%%39"&call set str=!str!%%var:~!m!,1%%
...

代码有多处错误，请修改后再拿分。
＊＊＊共同提高＊＊＊

TOP

terse

Rank: 8Rank: 8

帖子
2339 
积分
9739 
技术
475  
捐助
0  
注册时间
2008-2-25 
15楼
发表于 2008-8-12 09:59 | 只看该作者
原帖由 batman 于 2008-8-12 09:48 发表

代码有多处错误，请修改后再拿分。

多处错误？望兄指正。

TOP

12
返回列表