Ir ao conteúdo

Dia, mês e ano no Pascal


Catí Kurumim 7

Posts recomendados

Postado

Estou com dúvida de como declarar a variável para data, mês e ano nesse mesmo formato.

E como dizer se essa respectiva data é válida ou não.

18. Faça um Programa que peça uma data no formato dd/mm/aaaa e determine

se a mesma é uma data válida.

UPDATE

Alguém responde ai por favor! Obrigado.

Postado

Kurumim,

Estou com dúvida de como declarar a variável para data, mês e ano nesse mesmo formato.

E como dizer se essa respectiva data é válida ou não.

18. Faça um Programa que peça uma data no formato dd/mm/aaaa e determine

se a mesma é uma data válida.

Alguém responde ai por favor! Obrigado.

Você vai ter que considerar essa data como uma String inicialmente.

var
dataStr : String[10];

Depois, você vai extrair o dia, mês e ano dessa String. Se for permitido, você pode usar algumas funções de tratamento como a Copy(): http://www.freepascal.org/docs-html/rtl/system/copy.html (tem um exemplo útil para você). Para converter para inteiro, use a função Val(): http://www.freepascal.org/docs-html/rtl/system/val.html (com exemplo também).

Quando você tiver o dia, mês e ano armazenados em variáveis inteiras, você vai validar a data seguindo as regras que você já deve saber.. Fevereiro tem 28 dias, 29 se o ano for bissexto, etc. Se o cara entrar com 29/02/2013, o seu programa verifica e informa que a data é inválida. E assim por diante. A ideia é essa.

[]'s

LNW

Postado

Para verificar se a data é valida ou nao:

dia>0 e dia <=31 e tamanho(dia)=2

mes>0 e mes<=12 e tamanho(mes)=2

ano>0 e tamanho(ano)=4

//--------------//

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...

Ebook grátis: Aprenda a ler resistores e capacitores!

EBOOK GRÁTIS!

CLIQUE AQUI E BAIXE AGORA MESMO!