主题：编一个非非非......常简单的题目！~~~
神秘侠客
[专家分：80] 发布于 2007-12-27 21:02:00
求10、12、14平方的和。（用过程）
超超超超超超超超超简单！~
回复列表 （共18个回复）
沙发
木偶之舞 [专家分：60] 发布于 2007-12-27 21:38:00
什么叫“用过程”？
你要程序吗？既然超超超超超超超超超超超超超……简单，你为什么还要问？
我也是学生耶！不过应该比你大些，只不过在QBASIC上我们可能都是菜鸟吧？！
幸会，幸会！[em58]
交个朋友吧！[em59]
板凳
def [专家分：3380] 发布于 2008-01-06 16:29:00
print 10*10+14*14+12*12
3 楼
taoanran123 [专家分：20] 发布于 2008-01-08 20:26:00
data 10,12,14
read a,b,c
sum=a*a+b*b+c*c
print "sum=";sum
end
4 楼
QB小猪 [专家分：1200] 发布于 2008-01-11 18:48:00
的确很简单，不需要用过程，因为数字不太大！
cls
for i=1 to 3
read a:s=s+l1(a)
next i
print s
data 10,12,14
end
function l1(a)
l1=a*a
end function
好简单吧！
5 楼
神秘侠客 [专家分：80] 发布于 2008-01-19 21:49:00
拜托老大是用过程做！
6 楼
QB小猪 [专家分：1200] 发布于 2008-01-24 15:48:00
我难道不是用过程做的吗？function也是过程呀！
7 楼
xuyifan [专家分：40] 发布于 2008-02-01 21:44:00
function是函数,过程是SUB吧
cls
gosub 10
print i
sub 10
i=14*14+12*12+10*10
return
end
8 楼
神的思想 [专家分：80] 发布于 2008-02-05 18:47:00
DECLARE FUNCTION pf! (n!)
CLS
s = 0
FOR i = 5 TO 7
x = i * 2
s = s + pf(x)
NEXT i
PRINT "s="; s
END
FUNCTION pf (n)
pf = n * n
END FUNCTION
9 楼
ye243088621 [专家分：20] 发布于 2008-03-19 22:18:00
for i = 1 to 3
read x
data 10,12,14
call pf(x,y)
print y;
next i
end
sub pf(x,y)
y=x^2
end sub
10 楼
solove [专家分：10] 发布于 2008-03-20 21:07:00
x=10
pf(x)
s=s+x
x=12
pf(x)
s=s+x
x=14
pf(x)
s=s+x
print s
end
pf(a)
a=a*a
end sub
我来回复
您所在位置：