fun a (x) { x + 1}
fun b (x) { x + 2}
fun c (x) { x + 3}

{
  local funs = [a, b, c];
  local n = read (), i;

  for i := 0, i < 3, i := i+1 do
    write (funs[i] (n))
  od
}