program test_0903;
var i,a,b:integer;
function f(i:integer):integer;
begin
if (i=0) or (i=1) then f:=3 else f:=i-f(i-2)
end;
begin
i:=103;a:=i div 10;b:=i mod 10;
write(f(a),' ',f(b));
end.
输出：3 0