Re: [delphi-br] daniel; calculo para ano bissesto
formula (Ano mod 4 = 0 and Ano mod 100 0) or (Ano mod 400 = 0) - Original Message - From: danielromabr [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Friday, October 01, 2004 9:47 AM Subject: [delphi-br] daniel; calculo para ano bissesto ola estou estudando no 1 ano de sistemas de informacao na umc e estou estudando pascal quero saber como se calcula se um ano é bissexto ou nao: tem a ver com o numero de dias do ano?cmo é a formula? obrigado -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] daniel; calculo para ano bissesto
É só ver o fonte da função IsLeapYear() que lá tem. []s -Mensagem original- De: Renato H. Osaka ( Sófolha Informática ) [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 30 de setembro de 2004 08:37 Para: [EMAIL PROTECTED] Assunto: Re: [delphi-br] daniel; calculo para ano bissesto formula (Ano mod 4 = 0 and Ano mod 100 0) or (Ano mod 400 = 0) - Original Message - From: danielromabr [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Friday, October 01, 2004 9:47 AM Subject: [delphi-br] daniel; calculo para ano bissesto ola estou estudando no 1 ano de sistemas de informacao na umc e estou estudando pascal quero saber como se calcula se um ano é bissexto ou nao: tem a ver com o numero de dias do ano?cmo é a formula? obrigado -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] daniel; calculo para ano bissesto
ola estou estudando no 1 ano de sistemas de informacao na umc e estou estudando pascal quero saber como se calcula se um ano é bissexto ou nao: tem a ver com o numero de dias do ano?cmo é a formula? obrigado -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] daniel; calculo para ano bissesto
Olá, com o numero de dias do ano?cmo é a formula? Um ano é bissexto quando é divisível por 4, mas não divisível por 100, a menos que seja divisível por 400. Ex: 2000: foi bisexto (divisível por 400) 2004: foi bissexto 2005: não vai ser 2006: não vai ser 2100: não vai ser. 2400: vai ser Saudações, Eduardo Paci Galvão Engenheiro UFMG 1990 Belo Horizonte - Brasil www.egalvao.com.br -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] daniel; calculo para ano bissesto
use isto:
if ((ano mod 4)=0) then
writeln('Este é um ano bisexto')
else
Writeln('Este ano nao e bisexto');
- Original Message -
From: danielromabr
To: [EMAIL PROTECTED]
Sent: Friday, October 01, 2004 9:47 AM
Subject: [delphi-br] daniel; calculo para ano bissesto
ola
estou estudando no 1 ano de sistemas de informacao na umc e estou
estudando pascal
quero saber como se calcula se um ano é bissexto ou nao: tem a ver
com o numero de dias do ano?cmo é a formula?
obrigado
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Yahoo! Grupos, um serviço oferecido por:
Assine Claudia em
5x de R$ 18,96 Assine Info em
5x de R$ 21,48
Mais... Capricho Manequim Boa Forma Nova Exame
--
Links do Yahoo! Grupos
a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do
Yahoo!.
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
RES: [delphi-br] daniel; calculo para ano bissesto
O Delphi tem uma função pra checar se o ano é bissexto. Chama-se IsLeapYear().
[]s
-Mensagem original-
De: Clodoaldo [mailto:[EMAIL PROTECTED]
Enviada em: sexta-feira, 1 de outubro de 2004 14:04
Para: [EMAIL PROTECTED]
Assunto: Re: [delphi-br] daniel; calculo para ano bissesto
use isto:
if ((ano mod 4)=0) then
writeln('Este é um ano bisexto')
else
Writeln('Este ano nao e bisexto');
- Original Message -
From: danielromabr
To: [EMAIL PROTECTED]
Sent: Friday, October 01, 2004 9:47 AM
Subject: [delphi-br] daniel; calculo para ano bissesto
ola
estou estudando no 1 ano de sistemas de informacao na umc e estou
estudando pascal
quero saber como se calcula se um ano é bissexto ou nao: tem a ver
com o numero de dias do ano?cmo é a formula?
obrigado
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Yahoo! Grupos, um serviço oferecido por:
Assine Claudia em
5x de R$ 18,96 Assine Info em
5x de R$ 21,48
Mais... Capricho Manequim Boa Forma Nova Exame
--
Links do Yahoo! Grupos
a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do
Yahoo!.
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL
PROTECTED]
Links do Yahoo! Grupos
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
Re: [delphi-br] daniel; calculo para ano bissesto
function Bissexto(Ano: Integer): Boolean; begin Result := (Ano mod 4 = 0) and ((Ano mod 100 0) or (Ano mod 400 = 0)); end; - Original Message - From: danielromabr To: [EMAIL PROTECTED] Sent: Friday, October 01, 2004 9:47 AM Subject: [delphi-br] daniel; calculo para ano bissesto ola estou estudando no 1 ano de sistemas de informacao na umc e estou estudando pascal quero saber como se calcula se um ano é bissexto ou nao: tem a ver com o numero de dias do ano?cmo é a formula? obrigado -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: Assine Claudia em 5x de R$ 18,96 Assine Info em 5x de R$ 21,48 Mais... Capricho Manequim Boa Forma Nova Exame -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] daniel; calculo para ano bissesto
O Delphi já tem uma função pra isso, com código fonte disponível. Chama-se IsLeapYear(). Pesquisem a respeito. []s -Mensagem original- De: Alisson [mailto:[EMAIL PROTECTED] Enviada em: sexta-feira, 1 de outubro de 2004 15:42 Para: [EMAIL PROTECTED] Assunto: Re: [delphi-br] daniel; calculo para ano bissesto function Bissexto(Ano: Integer): Boolean; begin Result := (Ano mod 4 = 0) and ((Ano mod 100 0) or (Ano mod 400 = 0)); end; - Original Message - From: danielromabr To: [EMAIL PROTECTED] Sent: Friday, October 01, 2004 9:47 AM Subject: [delphi-br] daniel; calculo para ano bissesto ola estou estudando no 1 ano de sistemas de informacao na umc e estou estudando pascal quero saber como se calcula se um ano é bissexto ou nao: tem a ver com o numero de dias do ano?cmo é a formula? obrigado -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: Assine Claudia em 5x de R$ 18,96 Assine Info em 5x de R$ 21,48 Mais... Capricho Manequim Boa Forma Nova Exame -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
