como es la resolucion del ejercicio 1, tengo parcial mañana. si pueden ayudarme se los agradezco.

   

Fijate!

Graciassssss (Y(Y(Y(Y

Guarda que eso hay que pulirlo porque no te va a andar y te van a poner que está mal
Son sutilezas igual

1- En el procedimiento declara un VARCANT, pero en el desarrollo incrementa un CANT (en realidad incrementa VARCANT), es decir, habría que cambiarlo en el encabezado del procedimiento
2- Está recorriendo for I := 1 to N, pero en el IF usa una K. Vos estás parado en la posición I cuando leés, no en la posición K.

Nada más

nono, var puse adelante por que eso indica que es de salida. Es lo que devuelve el procedimiento Y la k jajaja le pifie va una i jajaja ahi tenes razon

Ah, jajaja, es que quedó muy juntito y parecía VARCANT en vez de Var cant , perdón!