回 帖 发 新 帖 刷新版面

主题:[活动]用FOR 语句编程输入N个任意数,将其中重复的数删得只剩下一个

用FOR 语句编程输入N个任意数,将其中重复的数删得只剩下一个

回复列表 (共1个回复)

沙发

input n
for i=1 to n :input a(i):next i
for i=1 to n
  for j=i+1 to n
    if a(j)=a(i) then a(j)=0
  next j
next i
for i=1 to n
  if a(i)<>0 then ?a(i);
next i
end

我来回复

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