program 4 code