Update funcion1escalar.c