第一问答网»论坛 › 中问网 › 问答 › pascal语言:数组中数字怎么分离开?

pascal语言:数组中数字怎么分离开?

11 |

2 | 2013-8-29 08:07:26 | 显示全部楼层 |阅读模式

把数字x=12345分离到数组中：a[1]=5,a[2]=4,a[3]=3,a[4]=2,a[5]=1(个位在a[1])，可以采用如下代码：i:=0;while x>0 dobegininc(i);a:=x mod 10;x:=x div 10;end;weishu:=i;需要输出时，可以用以下代码：for i:=weishu downto 1 dowrite(a);writeln;...