Error "Variable identifier expected" no consigo arreglarlo
Publicado por facundo (3 intervenciones) el 17/07/2019 23:50:46
La idea del programa es insertar datos de un arreglo desordenado en un arreglo auxiliar desordenado
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
uses crt;
const L1=3;
L2=2;
L3=l1+l2;
type z=array[1..l3] of integer;
var A, B, C: z;
i: integer;
procedure carga(var x: z; lim: integer);
begin
for i:=1 to lim do
begin
write('Numero ',i,' : ');
readln(x[i]);
end;
end;
procedure inserta(x: z; lim: integer);
begin
for i:=1 to lim do
begin
l3:=l3+1;
c[l3]:=x[i]; {ERROR Variable identifier expected}
end;
for i:=1 to lim do
write(c[l3]);
end;
begin
carga(A, L1);
carga(B, L2);
l3:=0;
inserta(A, L1); {ERROR Variable identifier expected}
inserta(B, L2);
readln
end.
Valora esta pregunta


0