escritura:- tell('archivo.txt'), write('primero.'), nl, write('segundo.'), nl, told, see('archivo.txt'), seen. lectura:- see('archivo.txt'), read(P), write(P), read(S), write(S), seen.