Fortran ganzzahlig bis doppelt

Question

Ich habe Zweifel über Fortran. Im folgenden Code:

program p 
integer num 
real*8 d 
num=111 
d=dble(num/4) 
print*, d 
end program p 

Ich bekomme 27,000000000000000. Ist es, weil num eine ganze Zahl ist und so num/4 vom selben Typ sein muss? Es ist ein Teil eines anderen Codes, den ich in Matlab übersetzen muss: in diesem speziellen Fall kann ich es als num/4 truncated übersetzen?

floor(num/4) 

Vielen Dank im Voraus

Answer 1

Ja, Sie erhalten 27.000000000000000 weil num eine ganze Zahl ist, so num\4 eine ganze Zahl ist.

Um eine echte Präzision Ergebnis zu erhalten, würden Sie einfach d=1./4*num

Ja schreiben, in Matlab diese floor(num/4) als num ist ein doppelter Genauigkeit Schwimmer, wenn Sie nichts anderes angeben würde.