+ STRAIGHT LINE CURVE FITTING BY JRHP4""d"CURVE FITTING BY METHOD OF LEAST SQUARES"("THIS PROGRAM WILL FIT A STRAIGHT LINE TO DATA"2"AND PRINT OUT THE EQUATION OF THE LINE"<"IT CAN ACCOMMODATE UP TO 50 PAIRS OF DATA WHICH CAN BE INCREASED"SF"BY CHANGING THE QUANTITIES IN THE DIMENSION STATEMENT": (10)iPG$"#######.####"Z X(50),Y(50),XSQ(50),XYSUM(50)d"": "NUMBER OF DATA PAIRS";N::nI0xII1 "DATA PAIR NUMBER ";I;" (X,Y) "; :""; X(I), Y(I) I N 120J0&XSUM01YSUM0<XQUR0GYQUR0SXYSUM0]JJ1rXSUMXSUM X(J)YSUMYSUM Y(J)XQURXQUR X(J)2YQURYQUR Y(J)2XYSUMXYSUM X(J)Y(J) J N 210ATWO(YSUMNXYSUMXSUM)(XSUMNXQURXSUM)2"ANE(XYSUMXQURATWO)XSUM;,""Z6"OUTPUT TO PRINTER (Y/N)"d@ P${J P$ "Y" 4,4:4T""; 20) "CURVE FITTING BY METHOD OF LEAST SQUARES"::^ 27)"X VALUES";12)"Y VALUES":hI0rII1 | 23);: G$; X(I);%  10);: G$; Y(I)7  I N 370? :z  23) "Y = ";: G$;ANE;: " + ";: G$;ATWO;:" X"  P$ "Y" 4:4:P$" ": 340 :"ANOTHER SET OF DATA (Y/N)  Y$  Y$ "Y" 100