PREVIO DEL CONTRATO
<script>
var n = (prompt(parseInt("digite numero")));
if ( n=<0 ) && ( n=>11 ){
var fruta, i;
frutas= new Array["manzana","pera","mango","lulo","guanabana","mora","banano","sandia","fresa","kiwi","pitaya"];
fLen = fruta.length;
for( i= 0; i < fLen; i++) {
if (i==n){
document.write('<font color="ff0000">' fruta[i] + "</font><br>")
}
else{
document.write( fruta[i] + "</font><br>")
}
}
else{
document.write('<marquee BEHAVIOR ="alternate" WIDTH="30%">'"ERROR"'</marquee>');
}
</script>
Ejercicios de seudocodigo
Realizar los siguientes Ejercicios en Pseint :
14. Desarrolle un algoritmo que permita determinar si un valor N es múltiplo de un Valor Z
Proceso p14
Escribir 'Ingrese un numero';
Leer n;
Escribir 'Ingrese otro numero';
Leer z;
Si n MOD z=0 Entonces
Escribir 'El numero ',n,' es multiplo de ',z;
Sino
Escribir 'El numero ',n,' No es multiplo de ',z;
FinSi
FinProceso
15. Desarrollar un algoritmo que permita determinar si un valor N (cualquiera), es divisor común de otros dos valores X y Y (que se ingresan por teclado)
algoritmo p15
Escribir "dame un numero"
leer n
imprimir " dame otro numero"
leer x
si n MOD x = 0 entonces
imprimir n "es divisor de" x
sino
imprimir n "no es divisor de " x
fin si
Fin Algoritmo
16. Diseñar un algoritmo que lea un valor N y determine si es múltiplo común de X y Z donde X y Z también se ingresan por teclado
Proceso p16
Escribir 'Ingrese un numero';
Leer n;
Escribir 'Ingrese otro numero';
Leer z;
Escribir 'Ingrese otro numero';
Leer x;
Si n MOD z=0 Y n MOD x=0 Entonces
Escribir n " es multiplo comun de " x " y " z
Sino
Escribir 'El numero ',n,' No es multiplo de ',z " y " x;
FinSi
FinProceso
17. Diseñar un algoritmo que permita leer dos valores V1 y V2 y determine cuál es el mayor y cuál es el menor o si son iguales
algoritmo p17
Escribir "dame numero";
Leer v1;
Escribir "dame numero";
Leer v2;
Si v1>v2 Entonces
Escribir "el mayor es:", v1
Sino
si v2>v2 entonces
Escribir "el mayor es:", v2
FinSi
FinSi
Si v1<v2 Entonces
Escribir "el menor es:", v1
Sino
Si v2<v1Entonces
Escribir "el menor es:", v1
Sino
Escribir "Son iguales";
FinSi
FinSi
fin algoritmo
18. Diseñe un algoritmo que permita leer dos números N1 y N2 e indicar si uno de los dos divide exactamente al otro.
algoritmo p18
Escribir "dame un numero"
leer n1
imprimir " dame otro numero"
leer n2
si n1 MOD n2 = 0 entonces
imprimir n1 "es divisor de" n2
sino
Si n2 MOD n1 = 0 Entonces
Escribir n2 "es divisor de" n1
Sino
Escribir "no son divisores del otro"
Fin Si
imprimir ""
fin si
fin algoritmo
19. Desarrollar un Algoritmo que permita el ingreso de dos valores X1 y X2 donde indique si el resultado de dividir la suma de los números entre la resta de X1 – X2 es exacta.
algoritmo p19
Escribir "dame numero";
Leer x1;
Escribir "dame numero";
Leer x2;
xs <- x1+ x2
xr <- x1 - x2
Si xs MOD xr = 0 Entonces
Escribir " la division es exacta"
Sino
Escribir " la division no es exacta"
Fin Si
fin algoritmo
20. Desarrollar un Algoritmo que permita el ingreso de 3 números Num1, Num2, Num3 e indicar si la suma de los 3 números es par o impar.
algoritmo p20
Leer num1, num2, num3
num <- num1 + num2 + num3
Si num mod 2 =0 Entonces
Escribir "El numero es par";
Sino
Escribir "El numero es impar";
FinSi
FinAlgoritmo
21. Desarrollar un Algoritmo que permita leer 3 valores diferentes e indique cual es el mayor de ellos, el menor o si son iguales
Proceso mayormenorigual
Escribir "dame numero";
Leer A;
Escribir "dame numero";
Leer B;
Escribir "dame numero";
Leer C;
Si A>B Y A>C Entonces
Escribir "el mayor es:", A
Sino
Si B>A Y B>C Entonces
Escribir "el mayor es:", B
Sino
Si C>A Y C>B Entonces
Escribir "el mayor es:", C
Sino
Escribir "son iguales";
FinSi
FinSi
FinSi
Si A<B Y A<C Entonces
Escribir "el menor es:", A
Sino
Si B<A Y B<C Entonces
Escribir "el menor es:", B
Sino
Si C<A Y C<B Entonces
Escribir "el menor es:", C
Sino
Escribir "Son iguales";
FinSi
FinSi
FinSi
FinProceso
22. Desarrollar un Algoritmo que permita leer 3 valores X1, X2, X3 e indicar si alguno de ellos divide a los otros dos exactamente.
Proceso p22
Escribir "dame numero";
Leer x1;
Escribir "dame numero";
Leer x2;
Escribir "dame numero";
Leer x3;
Si x1 MOD x2 = 0 Y x1 MOD x3 = 0 Entonces
Escribir x1 " es divisor de", x2 " y " x3
Sino
Si x2 MOD x1 = 0 Y x2 MOD x3 = 0 Entonces
Escribir x2 " es divisor de", x1 " y " x3
Sino
Si x3 MOD x1 = 0 Y x3 MOD x2 = 0 Entonces
Escribir x3 " es divisor de", x1 " y " x2
Sino
Escribir "ninguno es divisor de los otros 2 numeros";
FinSi
FinSi
FinSi
FinProceso