level 1
OPEN "hide.in" FOR INPUT AS #1 OPEN "hide.out" FOR OUTPUT AS #2 INPUT #1, a$ imax = 0 l = LEN(a$) FOR i = 1 TO l n$ = RIGHT$(a$, l + 1 - i) n = VAL(n$) IF n > imax THEN imax = n w = i END IF NEXT i PRINT #2, LTRIM$(STR$(w)) CLOSE END 非常感谢,我看不懂QBasic
2008年12月02日 09点12分
1
level 5
$代表定义和代码输出调用。。。#代表输出原字符。。c中不用close。。其余就是函数的对应。。自己找个文档查查就ok了
2008年12月06日 03点12分
2
level 0
OPEN "hide.in" FOR INPUT AS #1 '打开"hide.in",文件号1OPEN "hide.out" FOR OUTPUT AS #2 '打开"hide.out",文件号2 INPUT #1, a$ '从hide.in读取一字符串到aimax = 0 l = LEN(a$) '获得a的长度FOR i = 1 TO l n$ = RIGHT$(a$, l + 1 - i) '取a的l+1-i开始的右端的部分 n = VAL(n$) '将n转成数值类型 IF n > imax THEN imax = n w = i END IF NEXT i PRINT #2, LTRIM$(STR$(w)) '将w转成字符串并去掉左端的空格,写入hide.outCLOSE '关闭文件END c语言就自己写吧
2008年12月07日 15点12分
4