Duda en pascal!!!

[Yashiro]

En este programa lo que intento es sacar una serie de palabras que estan almacenadas en un archivo, las cuales las levanto en un arreglo (asumo que son 30 registros) pero cuando pongo el : "arreg_palab[cont]:=pal", me envia un error y no se la causa...

Aqui esta en codigo, lo compile en Turbo Pascal 7 de Borland :

Program archivo;
uses
Crt,dos;
type
arreg_palab = array[1..30] of string;
struct_palabra = record
pal:string;
end;

Var
arch_pal : file of struct_palabra;
palab:struct_palabra;
arch:text;
palabra:string;
op:integer;
cont,num_rand:integer;
cont:=0;


begin
assign(arch_pal, 'a:archiv.dat');
{$i-};
reset(arch_pal);
{$i+};
if ioresult<>0 then
begin
rewrite(arch_pal);
end;
while not eof(arch_pal) do
begin
read(arch_pal,palab);
cont:=cont+1;
with palab do
begin
writeln (pal);
arreg_palab[cont]:=pal;{Aqui es donde se pone el error }
end;
end;
end.


Saludos

P.D.
Si me pase en algun Begin o end no le presten atencion

[Keleriano]

No estoy muy seguro pues hace mucho que no toco pascal, pero creo que es por lo siguiente:

Cuando pones:
type
arreg_palab = array[1..30] of string;

estás definiendo el tipo, hasta ahi todo bien pero al usar:

arreg_palab[cont]:=pal;

no puedes hacerlo ya que es un tipo y no una variable, tendrías que definir en el apartado de variables algo asi como:

var_arreg_palab : arreg_palab;

y hacer la asignación:

var_arreg_palab[cont]:=pal;

Creo que tu problema es ese. Espero te sirva de ayuda :)

[luna8]

Creo que le problema es que estas utilizando el tipo record como una variable normal. Prueba esto:

var
estrucPal : struct_palabra; {le asignas el tipo record a una variable}

writeln (estrucPal.pal);
arreg_palab[cont]:= estrucPal.pal ;

Aún que en mi opinion creo que el record sobraría pues se suele usar para definir un conjunto de elementos, del mismo tipo o diferente.

ejemplo:

type

tPersona= record
nombre: string;
apellidos: string;
sexo: char;
estudiante: boolean;
end;


Saludos

[Yashiro]

Muchas Gracias por la ayuda