smanero

' utiliza este codigo Dim Fichero as string, Sent as string Open Fichero For Input As #1 Do While Not EOF(1) Input #1, Sent Loop Close #1

La respuesta que tienes es incorrecta. Para resolver el problema basta con leer y anotar (esto sirve para casi todos los problemas de nivel fácil). Tienes tres números que no sabes cuales son (por tanto POR, Y, Z) y te dicen que están en progresión...