pascal编程

Question

从键盘输入任意长度的一串字符，以“*”号结束，用递归的方法将这串字符中的数字字符反序输出。如Delphi6TP70Ada586*，输出685076

Answer 1

program ygb;
procedure p;
var c:char;
begin
read(c);
if c<>'*' then
begin
p;
if (c>='0') and (c<='9') then write(c);
end;
end;

begin
p;
end.

Answer 2

放大是否倒萨