PAGE 140 5-B

      DIMENSION X(5),Y(5)
      N=5
      SUM1=0.0
      SUM2=0.0
      SUM3=0.0
      SUM4=0.0
      DO 10 I=1,5
      READ(*,*) X(I),Y(I)
      SUM1=SUM1+X(I)
      SUM2=SUM2+Y(I)
      SUM3=SUM3+X(I)*Y(I)
      SUM4=SUM4+X(I)**2
  10  CONTINUE
      SUM5=SUM1**2
      SUM6=SUM1*SUM2
      B=(N*(SUM3-SUM6))/(N*(SUM4-SUM5))
      A=(SUM2-B*SUM1)/5
      Y=A+B*37
      WRITE(*,*)Y,A,B
      STOP
      END