Pascal/Turbo Pascal - Ayuda con este error

   
Vista:

Ayuda con este error

Publicado por simon (3 intervenciones) el 30/07/2017 04:31:31
Hice el siguiente programa, que tiene que mostrar la siguiente matriz:
12345
12345
12345
12345
12345

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
program uno;
var
vector: array [1..5,1..5] of integer
z,j:integer;
vec:vector;
num:integer;
begin
vec[1]:=1;
vec[2]:=2;
vec[3]:=3;
vec[4]:=4;
vec[5]:=5;
for z:= 1 to 5 do
writeln(vec[z]);
end;
begin
vec[1]:=1;
vec[2]:=2;
vec[3]:=3;
vec[4]:=4;
vec[5]:=5;
for j:= 1 to 5 do
writeln(vec[j]);
end;
readln;
end.

Y el programa me tira los siguientes errores:
a.pas(4,1) Fatal: Syntax error, ";" expected but "identifier Z" found
a.pas(0) Fatal: Compilation aborted
espero me puedan ayudar, gracias de antemano:D
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Ayuda con este error

Publicado por dario alderaan@ec-red.com (38 intervenciones) el 30/07/2017 07:11:44
Tu codigo un poco mas simple

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
uses crt;
var
	vector:array [1..5,1..5] of integer;
	i,j:byte;
begin
	clrscr;
	for i:=1 to 5 do begin
		for j:=1 to 5 do
			vector[i][j]:=j;
	end;
 
	for i:=1 to 5 do begin
		for j:=1 to 5 do
			write(vector[i][j],' ');
		writeln;
	end;
end.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Ayuda con este error

Publicado por ramon (2113 intervenciones) el 30/07/2017 22:42:23
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
40
41
42
43
44
45
46
47
48
49
50
51
{El array que pones de ves de tratarlo así,
esto vector: array [1..5,1..5] of integer de veria ser un type no un var}
 
program uno;
var
vector: array [1..5,1..5] of integer;
z,j:integer;
num:integer;
begin
vector[1,1]:=1;
vector[1,2]:=2;
vector[1,3]:=3;
vector[1,4]:=4;
vector[1,5]:=5;
for z:= 1 to 5 do
write(vector[1,z]);
writeln;
vector[2,1]:=1;
vector[2,2]:=2;
vector[2,3]:=3;
vector[2,4]:=4;
vector[2,5]:=5;
for j:= 1 to 5 do
write(vector[2,j]);
writeln;
vector[3,1]:=1;
vector[3,2]:=2;
vector[3,3]:=3;
vector[3,4]:=4;
vector[3,5]:=5;
for j:= 1 to 5 do
write(vector[3,j]);
writeln;
vector[4,1]:=1;
vector[4,2]:=2;
vector[4,3]:=3;
vector[4,4]:=4;
vector[4,5]:=5;
for j:= 1 to 5 do
write(vector[3,j]);
writeln;
vector[5,1]:=1;
vector[5,2]:=2;
vector[5,3]:=3;
vector[5,4]:=4;
vector[5,5]:=5;
for j:= 1 to 5 do
write(vector[3,j]);
writeln;
readln;
end.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Revisar política de publicidad