const
NUM=5;
Var
n:integer;
function r(n:integer}:intecer;
Var
i:integer;
begin
if n< = NUM then
begin
r:=n;
exit;
end;
for i:=1 to NUM d0
if r(n-i) < 0 then
begin
r:=i;
exit;
end;
begin
readln(n);
writeln(r(n));
end.
(1)
输入: 7
输入: 16
输出：1|4