Welcome to the first post for problem solving in FORTRAN.
I strongly recommend watching my previous lessons.
Check my FORTRAN programming page for more tutorials.
If you are confident enough about the previous lessons, lets dive right to the problems.
Find the mid-point of (2,4) and (4, -10).
To find the mid-point, we have formula:
Lets see the steps written in comments first:
program mid_point implicit none ! variable x1, x2, y1, y2 declaration. They are the input ! variable x, y declaration. let that be output ! writing formula for x ! writing formula for y ! printing out the value of x and y end program
First try yourself to write a code taking hint from above.
Look at the code below for any correction to your code.
program mid_point implicit none real :: x1, x2, y1, y2 real :: x, y x1 = 2; y1 = 4; x2 = 4; y2 = -10 x = (x1 + y1) / 2.0 y = (x2 + y2) / 2.0 print*, "The mid point is ", x, y end program
The output to the above code is:
The mid point is: 3.00000000 -3.00000000
If your answer is right, then your problem solving skill is good. Lets sharp them by another question.
Find the Gravitational Force exerted by the earth on 1 kg mass lying on the earth's surface. Use: earth mass = earth radius = 6400 km universal gravitational constant =
We have formula:
Our Formula has two quantity ‘m’ and ‘M’, which are recognized as the same in FORTRAN because FORTRAN is case insensitive. So lets change the formula to :
First try to write yourself.
Check the below code for correction to your code.
program force implicit none real, parameter :: G = 6.67E-11 ! for power of ten, write e OR E..... real :: m1, m2, R ! given value: m1 = mass of earth, m2 = mass of object, R = radius of earth real :: F ! output variable F = force ! assigning values m1 = 6*10**24 m2 = 1 R = 6400*1000 F = (G*m1*m2) / R**2 print*, "The force is", F end program
The output is:
The force is 683.935547
Now you are confident in problem solving using FORTRAN.
Examples of complex data type
Complex number has two parts: real and imaginary part. In FORTRAN, we write complex number as
We can perform basic math operation in complex data type like in integer and real.
Below is code that shows the uses of complex numbers.
program complex_math implicit none complex :: a, b ! declaring variable a and b as complex data type a = (3, 4) ! (3, 4) is 3 + 4i b = (1, -2) ! (1, -2) is 1 - 2i print*, a+b, a-b, a*b, a/b end program
(4.00000000, 2.00000000) (2.00000000, 6.00000000) (11.00000000, -2.00000000) (-1.00000000, 2.00000000)
FORTRAN performs such complications complex multiplication and vision easily, just like ordinary math.
Examples of character data type
Character data means the text or string.
Each letter or number or special character is a character. Combination of character becomes text.
While declaring character data type, we have to provide another specifier
len = "value"controls the length of the text. for eg.
program character_example implicit none character(len=4) :: text text = "welcome" print*, text end program
welc ! because of len=4
len = 1 gives output w len = 2 gives output we len = 3 gives output wel len = 4 gives output welc len = 5 gives output welco len = 6 gives output welcom len = 7 gives output welcome
So while using
len= "value", value should be greater than the length of text.
Example of logical data type
Logical data type in FORTRAN has only two values. They are:
program logicalUse implicit none logical :: correct, wrong correct = .true. wrong = .false. print*, correct print*, wrong end program
The output is:
Logical data type are not used for any calculations, rather it used to check conditional statements.
Not Clear Enough? Watch the Video on problem solving 1.