PLEASE PLEASE HELP! Need help with the following Fortran 90 Program: Build a dat

Question

PLEASE PLEASE HELP!

Need help with the following Fortran 90 Program:

Build a data cube called cubex of size 100x100x100 loaded with 1,000,000 integers generated using the following expressing:

Cubex = 37*(INT(i+2j+3k)**1.0/3) +127*(INT(log(2i +3j -1/k))) + 5*(INT(tan(3i+2j+5k)**2)

After the 1 million numbers have been stored write them to a file called bigF.txt Then read the file and send to the screen frames 50 to 51. Format the output carefully. Add main diagonal of this cube starting at (1,1,1). Then add a row in depth starting at (1,1,1)

Lastly add down another column staring (1,50,47). Print the three results to the screen.

Explanation / Answer

PROGRAM cu INTEGER :: i,j,k INTEGER, DIMENTION(100,100,100) :: cubex do i = 1,100 do j= 1,100 do k=1,100 cubex(i,j,k) = 37*(INT(i+2j+3k)**1.0/3) +127*(INT(log(2i +3j -1/k))) +5*(INT(tan(3i+2j+5k)**2) end do end do end do open (unit=13, file=

Related Questions

Navigate

• Browse (All)
• Browse P
• Subjects

Integrity-first tutoring: explanations and feedback only — we do not complete graded work. Learn more.