//ejercicio Nro 1 WHILE
INICIO
suma = 0
prod = 1
i = 1
mientras i <= 10
suma = suma + i //acumula la suma
prod = prod * i //acumula los productos
i = i + 1
fin-mientras
imprimir('La suma es ',suma)
imprimir('El producto es ',prod)
FIN
//Ejercicio Nro 2 FOR
INICIO
pos = 0
para i = 1 hasta 10
leer(num)
si num >= 0 //estoy suponiendo que cero es positivo
pos = pos + 1
fin-si
fin-para
imprimir('Hay ',pos,' numeros positivos')
FIN
//Ejercicio Nro 1 con IF
INICIO
leer(num)
si ((num >= 0 y num-int(num) < 0))
imprimir('Solo calcula la raiz cuadrada de numeros positivos')
sino si (num >= 0)
resp = sqrt(num)
imprimir('La raiz cuadrada de 'num' es ',resp)
sino
imprimir('ERROR: el numero es menor a cero')
fin-si
FIN
//Ejercicio Nro 1 Con CASE
INICIO
leer(num)
caso (num)
(num > = 0) y (num-int(num) < 0)
imprimir('Solo calcula la raiz cuadrada de numeros positivos')
(num >= 0)
resp = sqrt(num) //sqrt --> funcion que devuelve la raiz cuadrada
imprimir('La raiz cuadrada de 'num' es ',resp)
(num < 0)
imprimir('ERROR: el numero es menor a cero')
fin-caso
FIN
//Ejercicio Nro 2 con IF
INICIO
leer(calificacion)
si (calificacion>=91) y (calificacion <=100)
imprimir('Excelente')
sino si (calificacion>=81) y (calificacion <=90)
imprimir('Buena')
sino si (calificacion>=71) y (calificacion <=80)
imprimir('Deficiente')
sino
imprimir('Nota no valida')
fin-si
FIN
//Ejercicio Nro 2 con CASE
INICIO
leer(calificacion)
caso (calificacion)
(calificacion>=91) y (calificacion <=100)
imprimir('Excelente')
(calificacion>=81) y (calificacion <=90)
imprimir('Buena')
(calificacion>=71) y (calificacion <=80)
imprimir('Deficiente')
sino
imprimir('Nota no valida')
fin-caso
FIN