2450 PRINT : INPUT "Creacion Archivo Resultados ? (N) = ",A$