Pascal/Turbo Pascal - Operador odd

 
Vista:
sin imagen de perfil

Operador odd

Publicado por anonymous (12 intervenciones) el 06/08/2017 17:33:09
Buenas tardes, no encuentro la forma de realizar este ejercicio:

Sabiendo el funcionamiento del operador odd, estudiado en la actividad 2 optativa, realice un procedimiento que reciba dos parámetros que sean números enteros. Este procedimiento muestra por pantalla, los números pares que hay entre ambos.

¿Podéis ayudarme? Un saludo.
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
Imágen de perfil de Brais

Operador odd

Publicado por Brais (2 intervenciones) el 06/08/2017 20:25:46
Así es como lo veo yo:

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
program numPares;
 
procedure muestra(num1: integer; num2: integer);
var
	i: integer;
 
begin
	for i:= num1 to num2 do				{el bucle termina al alcanzar la segunda cifra}
	begin
		if odd(i) = false then			{aqui odd valora si el numero es impar y si no lo es (impar = false)}
		writeln(i);						{entonces muestra valor de i, que por fuerza ha de ser par}
	end;
end;
 
 
 var				{variables reales}
	numero1: integer;
	numero2: integer;
 
begin
	write('Introduzca primer numero: ');
	readln(numero1);
	writeln();
	write('Introduzca segundo numero: ');
	readln(numero2);
	writeln();
 
	muestra(numero1, numero2);
end.
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
sin imagen de perfil

Operador odd

Publicado por anonymous (12 intervenciones) el 06/08/2017 21:11:35
Muchísimas gracias Brais
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