1800 PRINT#3, : PRINT#3," Valor Medio = ";FNR(PY,NDE)