prg1.c