[Resolvido] Transformar data em um único número inteiro no formato mes

[Ricardo Caldeira 0]

Bom dia,

Eu sou novo na programação, recebi um exercicio de meu professor de algoritmo e nao tenho ideia de como responder...

 

 

Fazer um algoritmo que dada uma data no formato dia, mês e ano transforme-a no em um único número inteiro no formato mesdiaano (MMDDAAAA)

Ex.: dia = 31

mês =12 = resultado =12312006

ano = 2006

os outros que ele passou eu consegui mas esse ta dificil

 

 

desde ja agradeço

 

 

meu e-mail e ricardocaldeiralima@gmail.com

[Claudio Neto 3]

Ricardo.

 

A data está sendo passada para você dessa forma mesmo?

 

O dia em uma variável, o mês em outra e o ano em outra?

 

Se for basta concatenar as variáveis:

 

data = dia & mes & ano

 

Agora, se estiver sendo passado em formato de data, como por exemplo 31/12/2006, ai você pode utilizar o format e fazer assim:

 

data = format(31/12/2006,"DDMMYYYY")

 

Tendo dúvidas poste ai.

[Ricardo Caldeira 0]

Claudio, a data esta sendo passada como variavel,...

 

eu consegui fazer.

 

 

no visuAlg fica assim

 

algoritmo "Formatação de data."

// sintese
//  objetivo: Formatar a data de entrada em MMDDAAAA.
//  entrada : Dia, mês e ano.
//  saida   : A data no formato MMDDAAAA.

// declarações
var

  dia, mes , ano: inteiro
  
inicio

  escreval("Entre com o dia.")
  leia(dia)
  escreval("Entre com o mês.")
  leia(mes)
  escreval("Entre com o ano.")
  leia(ano)
  escreval()
  data<- mes*1000000 + dia*10000 + ano
  escreva("A data no formato MMDDAAAA, fica: ",data,".")
  
fimalgoritmo

desde ja, obrigado

[Claudio Neto 3]

Você não está construindo em VB, você apenas precisava construir o script.

 

Quando for assim, há uma área específica para lógica, procure postar lá que pode receber ajuda mais específica.

 

Tópico transferido de Visual Basic para Lógica de Programação e Algorítmos