１０位数程序实现输出最大值

好不容易上个网，就允许我多写几篇吧！

　这次是建了个ｃｏｍｍａｎｄ，点击写的。

　Ｄim max as integer

   Dim mystr as string

   mystr = " "

  for i = 0 to 9

mystr = mystr + " "+ str(f(i))

' print str(f(i))

Next i

print  mystr

 max = f(0)

 for i = 1 to 9

if  f(i)> max  then

     max = f(i)

 end  if

 next  if

print str(max)

end sub

心得体会：在ｃｏｍｍａｎｄ中写的时候，还得选择点击窗口，这样写的内容才有效。另外还是对ｍｙｓｔｒ　和ｓｔｒ（）不熟悉，应多看看书。