Zeichen zu Integer Umwandlung in Fortran

Question

Ich habe einen Datum Zeit Wert als Zeichen auf diese Weise "1985-01-01-00: 00" deklariert und ich möchte das Jahr, Monat und Tag als ganze Zahl extrahieren. Ich kenne den genauen Befehl in FORTRAN Sprache nicht.

Answer 1

Zum Beispiel:

program zz 
    character(20) :: ch = "1985-01-01-00:00" 
    integer yyyy,mm,dd 

    read(ch(1:4),'(i)') yyyy 
    read(ch(6:7),'(i)') mm 
    read(ch(9:10),'(i)') dd 

    write(*,*) yyyy, mm, dd 
end program zz