Fortran high precision example

This is an example about the high precision in Fortran, at first we see a normal Program:

our Result looks like this:

 

Now we use selected_real_kind(32) to get an higher precision data type:

Now we get this result:

looks much better than the first.