打印

p46w

q3771312

新手上路

Rank: 1

1^# 大中小发表于 2007-11-30 20:03 只看该作者

新手问题
用PASCAL的循环语句编1+2+3+4。。。。+100怎么做

求住

TOP

sky_yang_sky

版主

Rank: 7 Rank: 7 Rank: 7

2^# 大中小发表于 2007-12-1 15:08 只看该作者

i,sum:integer;
  for i := 1 to 100 do
      sum:=sum+i;
      edit1.text:=inttostr(sum);
多看看書

你微笑的面對整個世界，整個世界也將會微笑的面對你。

TOP

‹‹ 上一主题 | 下一主题 ››