Algoritmos-while

Diseñar un algoritmo que permita 
determinar el factorial de un determinado número.

**Analisis de datos
E:num(num)
S:f(factorial de num)

**Algoritmo
1.-Inicio
2.-num=0,f=0
3.-leer num
4.-i=0
   f=1
   mientras i< num
        i=i+1
 fac=fac*i
   fin_mientras
6.-Escribir fac
7.-Fin

**Prueba de escritorio
num=6
f=720

Dado una cantidad determinar la suma de sus dígitos.

**Analisis de datos
E:n(número)
S:sd(suma de dígitos)

**Algoritmo
1.-inicio
2.-n=0,r=0,sd=0
3.-leer n
4.-mientras n!=0
 r=n-(entero(n/10)*10)
     sd=sd+r
     n=entero(n/10)
   fin de mientras
5.-escribir sd
6.-fin

**Prueba de escritorio
n=356
sd=14

Diseñar un algoritmo que permita determinar
la total a pagar de una compra, ingresando 
producto,precio y cantidad.El algoritmo 
preguntara al usuario si desea seguir 
comprando.
   
Analisis de datos
 E:p,pc,c
 S:tp(total a pagar)

Algoritmo
 1.-inicio
 2.-p='',pc=0.0,c=0,op='',tp=0.0
 3.-mientras op!='no'
        leer p,pc,c,op
        tp=tp+(pc*c) 
    fin de mientras 
4.-escribir tp
5.-fin 

 Calcular la suma de n numeros ingresados hasta ingresar -1.

**Analisis de datos
E:n(número)
S:sd(suma de dígitos)

**Algoritmo
1.-inicio
2.-n=0,sum=0
3.-mientras n!=-1
     leer n
     sum=sum+n
   fin mientras
   
4.-escribir sum
6.-fin

**Prueba de escritorio
n=1,2,3,4,5,6,7,8,9,10,-1
sd=55