lama_byterun/regression/test013.expr

16 lines
229 B
Text
Raw Normal View History

2018-04-25 01:06:18 +03:00
n := read ();
2018-03-20 23:13:51 +03:00
repeat
if n == 1 then write (0)
elif n == 2 then write (1)
elif n == 3 then write (2)
elif n == 4 then write (3)
else write (10)
fi;
if n >= 5 then write (11) fi;
n := n - 1
2019-04-10 22:15:08 +03:00
until (n == 0)