首页 > 试题广场 >

(数字删除)下面程序的功能是将字符串中的数字字符删除后输出。

[填空题]
(数字删除)下面程序的功能是将字符串中的数字字符删除后输出。请填空。(每空3分,共12分)
var
  s : string;
  len, i : integer;
function delnum(var s : string) : integer;
Var
  I, j : Integer;
begin
  j := 1;
  for i:=1 to length(s) do
    if (s[i] < '0')    1     (s[i] > '9') then
    begin
      s[j] := s[i];
      2;
    end;
  exit(   3    );
end;
begin
  readln(s);
  len := delnum(s);
  for i:=1 to len do
    write(4);
  writeln;
end.

这道题你会答吗?花几分钟告诉大家答案吧!