Escreva um algoritmo que leia um dia, mês e ano e escreva, para essa data lida, o número de dias transcorridos no ano.

algoritmo"3.11"
var dia, mes, ano, calc1, calc2:inteiro
inicio escreval("Digite o ano")
leia(ano)
escreval("Digite o mês")
leia(mes)
escreval("Digite o dia")
leia(dia)
calc1<-mes*30
calc2<-dia+calc1
escreva("O total de dias transcorridos até agora somam ",calc2)
fimalgoritmo