🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: es.comp.os.linux.programacion
Article #2044

Re: PASCAL: Extraccion de palabras de un fichero de texto

#2044
From: Jos� Luis P�rez Diez
Date: Mon, 13 Jun 2005 07:00
27 lines
2111 bytes
In article <3591612127100059130@alumnos.uc3m.es>, Samuel Villafranca 
G&oacute;mez wrote:
> const
>   MAXLONGPALABRA=21;
> type
>   palabra= string[MAXLONGPALABRA];
>   tipoFich= file of palabra;
> 
> y este es mi procedimiento, peor genera un resultado extra�o que no se 
> a que se debe. Al abrir en un editor de texto no se ven las palabras 
> como tal, sino que al final de las palabras agrega algunos caracteres 
> que no deberian estar ah�.
>

El fichero generado es correcto.

Es un fichero de bloques con una logintud de bloque de almenos 21 
caracteres ( dependiendo del compilador) donde guarda toda la informacion 
del string basura incluida.

Si lo que quieres es un fichero de texo tienes que crear un fichero de 
texto y usar writeln y readln para accederlo.

--
Los programadores esta ocupados intendtado mejorar los programas a prueba 
de idiotas. Mientras tanto el universo  intenta mejorar los idiotas. El 
universo va ganando
Technical Details
Message-ID: <VA.000009be.058b2801@agujero-negro.escomposlinux.org>
Path: arc1-ca.pugleaf.net!g2news1.google.com!news3.google.com!news.glorb.com!news.antakira.com!cagarruta.escomposlinux.org!escomposlinux.org!antares.escomposlinux.org!news-16.escomposlinux.org!not-for-mail
References: <3591612127100059130@alumnos.uc3m.es>

Show Full Headers
Complete Article Headers
X-Google-Thread: f86c8,31561a286bf772f9
X-Google-Attributes: gidf86c8,public
X-Google-Language: SPANISH,ASCII
Path: arc1-ca.pugleaf.net!g2news1.google.com!news3.google.com!news.glorb.com!news.antakira.com!cagarruta.escomposlinux.org!escomposlinux.org!antares.escomposlinux.org!news-16.escomposlinux.org!not-for-mail
From: Jos� Luis P�rez Diez <jluis@agujero-negro.escomposlinux.org>
Newsgroups: es.comp.os.linux.programacion
Subject: Re: PASCAL: Extraccion de palabras de un fichero de texto
Date: Mon, 13 Jun 2005 08:00:04 +0100
Organization: JPD Co
Lines: 28
Message-ID: <VA.000009be.058b2801@agujero-negro.escomposlinux.org>
References: <3591612127100059130@alumnos.uc3m.es>
Reply-To: jluis@agujero-negro.escomposlinux.org
NNTP-Posting-Host: 83.247.136.72
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
X-Trace: news-16.escomposlinux.org 1118646112 2756 83.247.136.72 (13 Jun 2005 07:01:52 GMT)
X-Complaints-To: faro@escomposlinux.org
NNTP-Posting-Date: Mon, 13 Jun 2005 07:01:52 +0000 (UTC)
X-Newsreader: Virtual Access by Atlantic Coast PLC, http://www.atlantic-coast.com/va