Разъяснение задачи

Program task1
      real MaxX, MinX, SrX, SrY, SX, SY 
      real Sj, SrU, pol, otr, lol 
      integer nMaxX, nMinX
      dimension X(200),Q(200)
      pi=3.142857142857143
      N=101
      a=0
      b=1
      j=1
      k=1
      m=1
      l=1
!задать      print*, 'a и b-начало и конец отрезка'
!задать      print*, 'N-количество точек'
!задать      print*, 'Введите a,b,N'
!задать      read*, a,b,N
      h=(b-a)/(N-1)
      do i=1,n
      X(i)=a+(i-1)*h
      Q(i)=f(X(i))
 
      enddo
      MaxX=Q(1)
      MinX=Q(1)
      nMaxX=1
      nMinX=1
      do i=2,n
      if(Q(i) .gt. MaxX) then
      MaxX=Q(i)
      nMaxX=i
      endif
      if(Q(i) .lt. MinX) then
      MinX=Q(i)
      nMinX=i
      endif
      enddo
      print*, 'Максимальное значение:', MaxX
      print*, 'Номер Max элемента:', nMaxX
      print*, 'Минимальное значение:', MinX
      print*, 'Номер Min элемента:', nMinX
      SrY=0
      SY=0
      do i=1,n
      SrY=SrY+Q(i)
      SY=SY+(Q(i)*Q(i))
      enddo
      SrX=SrY/N
      SX=SY/(N)
      lol=sqrt(SX)
      print*, 'Среднее значение функции:', SrX
      print*, 'Средний квадрат функции:', SX
      print*, 'Среднеквадр значение', lol
      pol=0
      otr=0
      do i=1,n
      if(Q(i) .gt. 0) then
      pol=(pol+1)
      endif
      if(Q(i) .lt. 0) then
      otr=(otr+1)
      endif
      enddo
      pol=abs(pol/n-1)
      otr=abs(otr/n-1)
      print*, 'Относ число полож значений:', pol
      print*, 'Относ число отриц значений:', otr
      Sj=0
      do i=1,n
      Sj=Sj+((Q(i)-SrX)**2)
      enddo
      Sj=Sj/N
      Sj=sqrt(Sj)
      print*, 'Среднеквадратич отклонение', Sj
      end
 
      real function f(x)
      f=x*(1-x)-0.125!test
      !f=((1-x)**j)*(cosh(x)**k)*(x**m)-(x**l)!11var(31net)
      return
      end