Cantidad de Números
Publicado por Misael (41 intervenciones) el 08/04/2015 19:44:24
Buen día a Todos, quisiera que me ayudaran por-favor...
tengo que hacer un programa que me diga que números son par o impar de 10 números ingresados...
y que me imprima cuales son par e impares... Realice uno pero solo es de un solo numero ingresado... espero me pueda ayudar...
otro ejemplo solo que yo eligo los valores a ingresar 10 valores en números
tengo que hacer un programa que me diga que números son par o impar de 10 números ingresados...
y que me imprima cuales son par e impares... Realice uno pero solo es de un solo numero ingresado... espero me pueda ayudar...
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
PROGRAM EJER34;
USES CRT;
VAR num:INTEGER;BEGIN
ClrScr;
WRITE (Introduzca un numero entero: '); READLN (num);
IF num = 0 THEN
WRITE ('El numero introducido no es par ni impar, es 0')
ELSE IF ((num mod 2 = 0)) THEN
WRITE ('El numero introducido es par')
ELSE
WRITE ('El numero introducido es impar')
END.
otro ejemplo solo que yo eligo los valores a ingresar 10 valores en números
Valora esta pregunta
0
