10 CLS 20 PRINT "RECIPE COST" 30 PRINT 40 PRINT "NUMBER OF INGREDIENTS"; 50 INPUT N 60 FOR I=1 TO N 70 PRINT "iNGREDIENT";I;":" 80 PRINT" COST FOR BULK UNIT IN STORE"; 90 INPUT C 100 PRINT " NUMBER OF UNITS IN BULK"; 110 INPUT U 120 PRINT " NUMBER OF RECIPE UNITS PER BULK UNIT"; 130 INPUT F 140 PRINT " NUMBER OF RECIPE UNITS CALLED FOR"; 150 INPUT R 160 P=P+C/U/F*R 170 NEXT I 180 PRINT "NUMBER OF SERVINGS"; 190 INPUT S 200 PRINT 210 PRINT "TOTAL COST FOR 1 RECIPE = $";INT(P*100+.5)/100 220 PRINT "COST PER SERVING = $";INT(P/S*100+.5)/100 230 PRINT 240 PRINT "CHANGE NUMBER OF SERVINGS (1=yES, 0=NO)"; 250 INPUT N 260 IF N=1 THEN 180 270 END