local x, a, b, c; fun test1 (a) { write (a); print () } fun test2 (b) { write (b); print () } fun test3 (c) { write (c); print () } fun print () { write (a); write (b); write (c) } x := read (); a := 100; b := 200; c := 300; test1 (1); print (); test2 (2); print (); test3 (3); print ()