% script M-file example1.m

erasers = 4; % Number of each item
pads = 6;
tape = input('Enter the number of rolls of tape purchased > ');
items = erasers + pads + tape
cost = erasers*25 + pads*52 + tape*99
average_cost = cost/items

===Running the above script and entering the number 3 produces:===

>> example1
Enter the number of rolls of tape purchased > 3
items =
    13
cost =
   709
average_cost =
       54.538