Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Foros » Pascal/Turbo Pascal » Cómo informar números bajos en un programa?

Pascal/Turbo Pascal - Cómo informar números bajos en un programa?

Volver
Nuevo Tema
<<>>
 
Vista:
sin imagen de perfil

Cómo informar números bajos en un programa?

Publicado por Franco (1 intervención) el 18/04/2018 01:01:40
Hola, necesito ayuda con un ejercicio, ya que soy nuevo en esto y recién estoy comenzando. Tengo que realizar un programa que lea mil números enteros desde teclado e informar cuales son los dos números mínimos leídos.
Se lo agradecería muchísimo si me ayudan a resolverlo. muchas gracias!
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

Cómo informar números bajos en un programa?

Publicado por Ricardo Segundo (1 intervención) el 21/04/2018 07:45:25
Buenas! quedaría algo así:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
PROGRAM Ejercicio4T2;
VAR
	input, i, nmin, nmin2:integer;
BEGIN
	nmin:=999;
	nmin2:=999;
	for i:= 1 to 1000 do begin
		readln(input);
		if input < nmin then begin
			nmin2:= nmin;
			nmin:= input;
		end
		else
			if input < nmin2 then
				nmin2:= input;
 
 
	end;
	writeln(nmin, ' ', nmin2);
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