My coorected 1st prg