local n = read (); for local i; i := 0, i<10, i := i + 1 do write (i) od