PART II Problem 1 The required FORTRAN 90 program reads a nu

PART II Problem 1: The required FORTRAN 90 program reads a number of sets of values. The actual number of sets is read from the keyboard. Each set has less than 51 integer values, read from the keyboard, one per line. The actual number of values in a set is read from the keyboard. A pattern map is generated for each set of numbers where a value greater than zero is indicated by a \"P\" a zero by the character \"Z\", and a value less than zero by the character \"M\". This pattern is printed for each set of values as in the sample output below. (your program output should match the sample output). An example run with a program for this problem follows:

Solution

real, dimension(5) :: a, b integer:: i, asize, bsize asize = size(a) bsize = size(b) do i = 1, asize a(i) = i end do do i = 1, bsize b(i) = i*2 end do do i = 1, asize Print *, a(i) end do do i = 1, bsize Print *, b(i) end do Print*, \'Vector Multiplication: Dot Product:\' Print*, dot_product(a, b) end program arrayDotProduct