Como esqueco o tempo todo como fazer essas conversoes, decidi escrever aqui um resumo do processo.Tomando-se as seguintes 3 variaveis:CHARACTER(100) :: TEXTOREAL*8 :: VALOR_REALINTEGER :: VALOR_INTEIROSe um "numero" e armazenado no TEXTO, por exemplo:TEXTO = '5.6987'a conversao pode ser feita utilizando o READ() de forma bem simples.READ(TEXTO,*) VALOR_REALREAD(TEXTO,*) VALOR_INTEIRO.Converter variaveis FORTRAN, conversao de variaveis, texto para numero, caracter para real, caracter para inteiro. Neste post e apresentado um cronometro simples com interface grafica mais simples ainda, que permite mostrar o tempo (em segundos) decorrido desde o inicio da execucao de um codigo qualquer. A figura abaixo da uma ideia do cronometro supracitado (pequena caixa de dialogo que aparece no canto superior esquerdo da figura).OBSERVACAO: Primeiro de tudo, nao esqueca que o acoplamento deste cronometro ao seu codigo deixara sua aplicacao um pouco mais lenta!ACOPLANDO O CRONOMETRO A SUA APLICACAOO primeiro passo e baixar o codigo fonte (um projeto completo utilizando o cronometro, mostrado na figura acima), para isto basta clicar aqui e baixar o arquivo .zip hospedado no rapidshare!No exemplo, o cronometro foi inserido em um projeto FORTRAN CONSOLE APPLICATION. Tudo foi desenvolvido em Compaq Visual Fortran 6.6.Apos baixar os arquivos, copie ATUALIZA_CRON.F90, CRONOMETRO_DIALOG.rc e RESOURCE.fd para a pasta do seu projeto.(Procedimento verificado apenas em CVF 6.6) Com seu projeto aberto no CVF, clique no menu Project, va em Add to Project e clique em Files. Adicione os arquivos CRONOMETRO_DIALOG.rc e RESOURCE.fd.Na subrotina que voce quer cronometrar, insira as definicoes para utilizar o cronometro:!******************************************************************! DEFINICOES PARA UTILIZAR O CRONOMETROUSE DFPORT !PARA USAR A FUNCAO TIMEFUSE DFLOGMINCLUDE 'RESOURCE.FD'TYPE (DIALOG) DLGLOGICAL RETLOGREAL*8 :: TEMPO!******************************************************************E logo apos a definicao das variaveis de sua subrotina, insira o codigo para inicializar o cronometro:!*******************************************************************!INICIALIZANDO O CRONOMETRORETLOG = DLGINIT(101,DLG) !INICIALIZANDO A CAIXA DE DIALOGOIRET = DLGMODELESS(DLG) !IMPRIMINDO A CAIXA NA TELA (NAO MODAL)TEMPO = TIMEF() !INICIALIZANDO A CONTAGEM DO TEMPO!******************************************************************* PRONTO!!!Agora e so chamar a subrotina que atualiza o tempo dentro dos principais loops da subrotina a ser cronometrada:CALL ATUALIZACRON(DLG) !ATUALIZAR TEMPO MOSTRADO NA CAIXA DE DIALOGO O CRONOMETRO PODE SER MODIFICADO E MELHORADO CONFORME SUAS NECESSIDADES.Para modifica-lo, va em ResourceView e clique duas vezes em IDD_DIALOGTEMPO. A aba ResourceView fica imediatamente abaixo de onde aparecem os nomes dos arquivos do seu projeto. Uma otima referencia sobre Interfaces Graficas em CVF 6.6 e encontrada no post Desenvolver interfaces graficas. Acredito que a forma mais facil de determinar se um numero e PAR ou IMPAR em FORTRAN e utilizando a funcao intrinseca MOD(.), que retorna o resto de uma divisao. Se o resto de uma divisao por 2 e igual a zero, o numero e par, se e igual a um, o numero e impar.Nesse caso, para determinar se X e par, tem-se:!PARA O CASO DE X REAL: IF ( MOD( X , 2.D0) == 0 ) THEN ! -> X e PAR!!PARA O CASO DE X INTEIRO: IF ( MOD( X , 2) == 0 ) THEN ! -> X e PAR!Caso contrario, X e IMPAR. "Modificar" algo que foi escrito na tela nao e algo dificil. Neste post mostra-se como fazer isso em Windows, utilizando o Compaq Visual