回 帖 发 新 帖 刷新版面

主题:问一下

今天考过试了,里面有一道题目:
阅读程序,写出结果。
program test4;
 var s:array[1..a] of integer;
      a,b:integer;
begin
 read(a);
 b:=0
 while a<>0 do
 begin
  inc(b);
  s[b]:=a mod 2;
  a:=a div 2;
 end;
for a:=b downto 1 do write(s[a],‘ ’);
end.
输入:58
我认为题目意思是十进制转换为二进制,但是inc()是不是累加函数呢?

回复列表 (共5个回复)

沙发

inc(i:integer):integer
inc=i+1

inc(i,a:integer):integer
inc=i+a

板凳

不用知道是做什么的
反正一步一步往下算啦

3 楼


没有这一题吧

4 楼

谁偷了我的密码在这里耍酒疯?

5 楼

[quote]不用知道是做什么的
反正一步一步往下算啦[/quote]
  
还那么高的专家得分!!!!

我来回复

您尚未登录,请登录后再回复。点此登录或注册