Tarea 12.Nov.13

Pagina 341
Problema 6

Pseudocodigo

Inicio funcion calc_anos(int, int&, int&, int&)
sa= dias/365
sm= (dias-(sa*365))/30
sd=dias-(sa*365+(sm*30))
Final funcion calc_anos


inicio Programa

dias, sd,sm,sa,d,m,a int 
write"Introduzca el numero de dias: "
read dias
write"Si desde 1/1/1900 han pasado ",dias", dias"
calc_anos(dias, sd, sm, sa)
a=1900+sa
m=1+sm
d=1+sd
write"Hoy es: ",d," / ",m," / ",a
Final programa