write program2