Pascal/Turbo Pascal - Ayuda números aleatorios< > y posición.

 
Vista:
sin imagen de perfil
Val: 9
Ha disminuido su posición en 2 puestos en Pascal/Turbo Pascal (en relación al último mes)
Gráfica de Pascal/Turbo Pascal

Ayuda números aleatorios< > y posición.

Publicado por Augusto (6 intervenciones) el 05/11/2017 01:04:01
Hola a todos soy estudiante de programación y tengo un problema con el siguiente enunciado dice realizar un programa donde se almacenen 10 números al azar, el programa debe retornar el numero menor y el mayor y la posición donde se encuentre.

es lo poco que pude avanzar

program menorMayorPosicion
var
aleat: array [1…10] of integer = (12,20,26,); ← siempre me da error de sintaxis y no se como seguir

begin
randomize()


end.
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
sin imagen de perfil
Val: 287
Oro
Ha mantenido su posición en Pascal/Turbo Pascal (en relación al último mes)
Gráfica de Pascal/Turbo Pascal

Ayuda números aleatorios< > y posición.

Publicado por dario (38 intervenciones) el 05/11/2017 05:24:10
Te dejo este codigo.

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
uses crt;
var
	num:array [1..10] of integer;
	posme,posm,mayor,menor,x,i,j:integer;
begin
	clrscr;
	randomize();
	mayor:=0;
 
	for i:=1 to 10 do begin
		x:=random(1000); {numeros aleatorios desde 0 hasta 1000}
		num[i]:=x;
	end;
 
	for i:=1 to 10 do
		write(num[i],' ');
 
	writeln;
 
	for i:=1 to 10 do begin
		if num[i] > mayor then begin
			mayor:=num[i];
			posm:=i;
		end;
	end;
 
	menor:=num[1];
	for j:=2 to 10 do begin
		if num[j] < menor then begin
			menor:=num[j];
			posme:=j;
		end;
	end;
 
	writeln;
	writeln('El mayor es ',mayor,' y esta en la posicion ',posm);
	writeln('El menor es ',menor,' y esta en la posicion ',posme);
end.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
2
Comentar
sin imagen de perfil
Val: 9
Ha disminuido su posición en 2 puestos en Pascal/Turbo Pascal (en relación al último mes)
Gráfica de Pascal/Turbo Pascal

Ayuda números aleatorios< > y posición.

Publicado por Augusto (6 intervenciones) el 05/11/2017 06:40:32
Muchísimas gracias me hacia falta no tenia mas ideas de como ordenarlo y veo que hay cosas que no conozco como el posm y como usas el begin ahorao voy a poder hacer otros ejercicios gracias
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
sin imagen de perfil
Val: 287
Oro
Ha mantenido su posición en Pascal/Turbo Pascal (en relación al último mes)
Gráfica de Pascal/Turbo Pascal

Ayuda números aleatorios< > y posición.

Publicado por dario (38 intervenciones) el 05/11/2017 14:17:48
posm: es una variable para almacenar la posicion del mayor, y posme, es la variable para almacenar la posicion del menor.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar