function Question (qname,
type,
qstring,
response,
comment,
corrects,
explan,
score,
ifcorrect,ifwrong,ifnull,
img)
{this.qname=qname;
this.type=type;
this.qstring=qstring;
this.response=response;
this.comment=comment;
this.corrects=corrects;
this.explan=explan;
this.score=score;
this.ifcorrect=ifcorrect;
this.ifwrong=ifwrong;
this.ifnull=ifnull;
this.img=img;
}

var zin=1,top=0, mycount=0, waitTime=0, qright=0, mycomment;
var global=new Array(3);
var recent, recent2, recdone=false, opera7, opera=CheckOpera56();
function cachewrite(s,idx){global[idx]+=s;}
function CheckOpera56()
{
var version;
if (navigator.userAgent.toLowerCase().indexOf('opera') == -1) return false;
version=parseInt(navigator.appVersion.toLowerCase());
if (version>6) {opera7=true; return false;}
if (version<5) return false;
return true;
}
resp=new Array("Demand to price change","Quantity demanded to price change","Shifts in demand when price changes","Changes in total expenditures when total revenues change","Changes in total revenues when total expenditures change")
corr=new Array("0","1","0","0","0")
comm=""
valu=""
quest001 = new Question(
"Question 1",
0,
"<font face=\"Times New Roman\" size=\"5\">The elasticity of demand measures the responsiveness of:</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("The demand will be more elastic","The demand curve will be flatter","The quantity demanded is likely to be more responsive to price changes","The quantity demanded is likely to be less responsive to price changes","A price increase is likely to lead to less total revenue")
corr=new Array("0","0","0","1","0")
comm=""
valu=""
quest002 = new Question(
"Question 2",
0,
"<font face=\"Times New Roman\" size=\"5\">If a good is considered a necessity, which of the following is most likely to occur?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("more elastic","less elastic","more costly","indeterminant","more plentiful")
corr=new Array("1","0","0","0","0")
comm=""
valu=""
quest003 = new Question(
"Question 3",
0,
"<font face=\"Times New Roman\" size=\"5\">If scientists discover alternative ways of powering automobiles and markets are created for these alternative fuels, the demand of gasoline is going to become:</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("will have a more elastic demand","will have a less inelastic demand","will have a more inelastic demand","will always have a unit elastic demand","will always account for a larger share of the food budget")
corr=new Array("0","0","1","0","0")
comm=""
valu=""
quest004 = new Question(
"Question 4",
0,
"<font face=\"Times New Roman\" size=\"5\">If we compare the purchase of salt to the purchase of meat in the typical family budget, we would find that salt:</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("the demand for gasoline will be equally elastic in the first month as it will be 14 monts later.","the demand for gasoline will become more inelastic fourteen months later","the demand for gasoline will always be inelastic","the demand for gasoline will be more elastic in month fourteen than it was in month one.","the demand for gasoline will most likely be unit elastic")
corr=new Array("0","0","0","1","0")
comm=""
valu=""
quest005 = new Question(
"Question 5",
0,
"<font face=\"Times New Roman\" size=\"5\">If the price of gasoline increases, which of the following statements depicts what is most likely to occur?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("Good A will have a greater decrease in total revenue than good B","Good B will experience a greater increase in total expenditures than good A","Good A will have a greater decrease in total expenditures than good B","We can not determine what will happen to total revenues for good A compared to good B","Good A will experience a greater increase in total revenue than good B")
corr=new Array("0","0","0","0","1")
comm=""
valu=""
quest006 = new Question(
"Question 6",
0,
"<font face=\"Times New Roman\" size=\"5\">Assuming that good A and good B currently sell at the same price. Good A has a more vertical demand curve than good B. Both goods A and B experience a 10% increase in price, then:</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("the demand for jellybeans is elastic","the demand for jellybeans is inelastic","the demand for jellybeans is unit elastic","the demand for jellybeans does not respond to price changes","the demand for jellybeans is consistent with the law of demand")
corr=new Array("0","0","0","0","1")
comm=""
valu=""
quest007 = new Question(
"Question 7",
0,
"<font face=\"Times New Roman\" size=\"5\">Given the following information: the price of jellybeans increases and the quantity demanded of jellybeans decreases, then we can conclude:</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("an elastic demand for that product","an inelastic demand for that product","no demand for that product","be very responsive to price changes of that product","will likely spend less on that product if the price increases")
corr=new Array("0","1","0","0","0")
comm=""
valu=""
quest008 = new Question(
"Question 8",
0,
"<font face=\"Times New Roman\" size=\"5\">A person who has an addiction for a product will have:</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("total revenues in the music cd industry will go down.","total revenues in the music industry will increase","total revenues in the music industry will go down but total expenditures will increase","total revenues in the music industry will increase but total expenditures will decrease","cannot determine an answer without knowing the original price before the price change")
corr=new Array("1","0","0","0","0")
comm=""
valu=""
quest009 = new Question(
"Question 9",
0,
"<font face=\"Times New Roman\" size=\"5\">If music cd's experience a 10% increase in price and the equilibrium quantity decreases by 20%, than</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("placing a tax on a good with an elastic demand","placing a tax on a good with an inelastic demand","placing a tax on a good that has many substitutes","placing a tax on a good that is a large part of household budgets","placing a tax on a good with a relatively horizontal demand curve")
corr=new Array("0","1","0","0","0")
comm=""
valu=""
quest010 = new Question(
"Question 10",
0,
"<font face=\"Times New Roman\" size=\"5\">If the government wants to put a per unit tax on a product so that it can raise revenue to support local schools. It would best accomplish this goal by</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("the good had no substitutes","the good was a necessity","the good had many substitutes","the good was a very small part of consumers budgets","the good had a vertical demand curve")
corr=new Array("0","0","1","0","0")
comm=""
valu=""
quest011 = new Question(
"Question 11",
0,
"<font face=\"Times New Roman\" size=\"5\">If government would like to discourage the consumption of a particular good by placing a per unit tax on it, this action would be more effective if:</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("had an elastic demand","had an inelastic demand","had a unit elastic demand","experienced an increase in quantity demanded","would have made less profit")
corr=new Array("0","1","0","0","0")
comm=""
valu=""
quest012 = new Question(
"Question 12",
0,
"<font face=\"Times New Roman\" size=\"5\">If the Brureff Corporation increased the price of its product by 10% and the total revenues from this product increased by 1%, then it can be concluded that the product:</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("an elastic demand","an inelastic demand","a unit elastic demand","no substitutes","was less profitable")
corr=new Array("0","0","1","0","0")
comm=""
valu=""
quest013 = new Question(
"Question 13",
0,
"<font face=\"Times New Roman\" size=\"5\">If the Brureff Corporation increased the price of its product by 10% but total revenues remained the same, it can be concluded that the product had </font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("total revenues would decrease and there would be less profit","total revenues would increase but no conclusion can be reached on profitablility","total revenues would decrease but no conclusion can be reached on profitability","total revenues would increase but profit would decrease","total revenues would increase and profit would increase")
corr=new Array("0","0","0","0","1")
comm=""
valu=""
quest014 = new Question(
"Question 14",
0,
"<font face=\"Times New Roman\" size=\"5\">The Brureff Corporation, operating in an increasing cost industry, increased the price of its product by 10% and the demand for the product was inelastic. It can be concluded that</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("total revenues to increase and total profits to increase","total revenues to decrease and total profits to decrease","total revenues to increase but cannot determine what will happen to total profit without calculating the effect on total costs","total revenues to decrease but cannot determine what will happen to total profit without calculating what will happen to toal costs","without further analyze can definitely calculate that total profits will increase")
corr=new Array("0","0","1","0","0")
comm=""
valu=""
quest015 = new Question(
"Question 15",
0,
"<font face=\"Times New Roman\" size=\"5\">If the Brureff Corporation, operating in an increasing cost industry, decreases its price by 10% and has an elastic demand for its product, it can expect</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("total revenues to decrease and total profit to decrease","total revenues to increase and total profits to increase","total revenues to increase but cannot determine what will happen to profit without an analysis on the effect on total cost","total revenues to decrease but cannot determine what will happen to total profit without an analysis on the effect on total cost","total revenues to increase and total profit to decrease")
corr=new Array("0","0","0","1","0")
comm=""
valu=""
quest016 = new Question(
"Question 16",
0,
"<font face=\"Times New Roman\" size=\"5\">The Brureff Corporation, operating in an increasing cost industry, increases the price of it product by 10% and sells a product with an elastic demand.</font><br><font face=\"Times New Roman\" size=\"5\">It can expect:</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("the company's total revenue and total profit decreased","the company's total revenue increased but profit fell","the company's total revenue increased and total profit increased","the company's total revenue increased but total profit cannot be determined","the company's total revenue decreased but total profit cannot be determined")
corr=new Array("0","0","1","0","0")
comm=""
valu=""
quest017 = new Question(
"Question 17",
0,
"<font face=\"Times New Roman\" size=\"5\">The Reffbru Corporation starts a senior prom dating service. the company offers to find its customers the perfect date for the prom among the customers' school mates. Only 20 percent of the high school population is interested in Reffbru Corporation service. (You know who you are!). After the first year when Reffbru charged $50 for this service and made a modest profit, the company decides to increase the price to $55. The new price leads to a drop of 5% in the company's customers. The company's per customer cost remains the same. It can be concluded that in the second year</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("less elastic","more elastic","more inelastic","not affected by the additional pharmacies","more profitable")
corr=new Array("0","1","0","0","0")
comm=""
valu=""
quest018 = new Question(
"Question 18",
0,
"<font face=\"Times New Roman\" size=\"5\">Insulin has inelastic demand. In the city of Mayberry in the year of 2005 there was only one pharmacy selling insulin, the Opie pharmacy. In the year 2006, nine additional phamacies open in Mayberry. Each of the pharmacies has a different markup policy. In the year 2006, the Opie pharmacy can now expect the demand for its insulin to be</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("they will make more money in the short run","they will make more profit in the short run","the quantity that they sell will decrease","the revenues they receive will increase","they are making a dumb mistake")
corr=new Array("0","0","0","0","1")
comm=""
valu=""
quest019 = new Question(
"Question 19",
0,
"<font face=\"Times New Roman\" size=\"5\">The Reffbru Corporation has a product with an inelastic demand that is not perfectly vertical. The two brilliant managers of the corporation decide to lower the price of the product to increase the quantity sold, without further information it can be concluded that</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("Roberto's restaurant has a less elastic demand than Alberto's.","Alberto's restaurant has a less elastic demand than Roberto's","Both Roberto's and Alberto's restaurants have an inelastic demand","Competition from other types of restaurants does not have an affect on the elasticity of either brother's restaurant","Neither Roberto nor Alberto should consider the elasticity of demand for their respective restaurant when changing prices on the menu.")
corr=new Array("1","0","0","0","0")
comm=""
valu=""
quest020 = new Question(
"Question 20",
0,
"<font face=\"Times New Roman\" size=\"5\">Roberto Sanchez owns the only Mexican restaurant in Fall River, Massachusetts. Roberto's brother, Alberto, owns a Mexican restaurant in Tucson, Arizona where there are many Mexican restaurants. Both brothers are running profitable restaurants. It can be assumed that :</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

questions = new Array (
quest001,quest002,quest003,quest004,quest005,quest006,quest007,quest008,quest009,quest010,quest011,quest012,quest013,quest014,quest015,quest016,quest017,quest018,quest019,quest020)

function doQuestion(quest)
{
var numdo;
var numord=eval(quest+1);
var i=-1, ii, type, myname, gadget;
type=questions[quest].type;
numdo=type>=3?1:questions[quest].response.length;


document.writeln ("<a name=\""+questions[quest].qname+"\"></a>")
document.write("\n")
document.write("    <tr>\n")
document.write("      <td width=\"5%\" align=\"center\" valign=\"top\" bgcolor=\"#E6E6FF\"><font face=\"Verdana\"\n")
document.write("      color=\"#000080\"><strong><small>")
document.write(numord)
document.write("</small></strong></font></td>\n")
document.write("      <td width=\"95%\" valign=\"top\" bgcolor=\"#F4F4FF\"><font face=\"Verdana\"><font color=\"#000080\"><strong><small>\n")
document.write("      ")
if (questions[quest].img!="") {
document.write("\n")
document.write("         <img border=\"0\" hspace=\"10\" vspace=\"5\" align=\"left\" src=\"")
document.write(questions[quest].img)
document.write("\">\n")
document.write("      ")
}
document.write("\n")
document.write("      ")
document.writeln(questions[quest].qstring)
document.write("</small></strong></font><br>\n")
document.write("      <br><small><small>\n")
document.write("      ")
for (i=0; i<numdo; i++) {
myname=questions[quest].qname;
gadget="radio";
if (type>=3) gadget="text";
else if (type==1) {
myname+="_"+(i<9?"0":"")+(i+1);
gadget="checkbox";}
document.write("\n")
document.write("         ")
document.write(type==7?"<textarea name=\""+myname+"\" rows=5 cols=30 class=\"input\">":" <input type="+gadget+" name=\""+myname);
if (type<3) document.write("\" value=\""+i+"\">\n")
else document.write(type==7?"</textarea>":"\" class=\"input\" value=\"\">\n")
if (type<3) document.write(questions[quest].response[i]);
document.write("<br>\n")
document.write("      ")
}
document.write("\n")
document.write("      </small></small></font></td>\n")
document.write("    </tr>\n")
document.write("    ")
}
function doTest() {
var count, i;

count=questions.length;
for (i=0; i<count; i++) doQuestion(i);
}
function fill(s,l){
s=s+""
for (y=1;y<=l;y++)
if (s.length>=l) break; else s="0"+s;
return s
}
function CheckQName(wapf,ii,i,multi,selection){
var len;
if (!multi) return(wapf.elements[ii].name==questions[i].qname);
len=questions[i].qname.length;
if (wapf.elements[ii].name.substring(0,len)!=questions[i].qname) return false;
if (wapf.elements[ii].name.substring(len,len+1)!="_") return false;
if (eval(wapf.elements[ii].name.substring(len+1,len+3))==(selection+1)) return true;
return false;
}
function errore(uno,due,tre)
{
if (!errori) global[1]="<H3>You have made the following errors</H3>";
++errori;
cachewrite("<p><b>"+uno+"</b><br>"+due+"<br>"+mycomment+tre+"</p>",2);
mycomment="";
}
function testIE5plus(){
var pos=navigator.appVersion.lastIndexOf('MSIE ');
if (pos != -1) {
pos+=5;
if (eval(navigator.appVersion.charAt(pos))>4)
return true;}
return false;}
function correct(wapf)
{
var i, ii, t, re, tmp, selection, multi, multipage=0, type, isnull, iswrong, iscorrect, evaluation=0, total=0, udat;
errori=waitTime=0;
udat=new Array();
for (i=0, ii=0; i<wapf.elements.length; i++)
{tmp=wapf.elements[i];
if (tmp.name.substring(0,13)=="Quiz.UserData"){
t=tmp.name.substring(14,tmp.name.length);
re=new RegExp("_", "g");
t=t.replace(re," ");
udat[ii++]=t+": <i>"+tmp.value+"</i><br>";
if (opera) tmp.value="";}}
global[0]=global[2]="";
global[1]="<h3>Congratulations, you haven't made any errors</h3>";
cachewrite("<html><head><title>Results</title><BASE target='_blank'></head><body bgcolor='#FFFFFF'><font face='Verdana, Arial'><table border=0 cellpadding=0 cellspacing=0 width='100%' bgcolor='#C0C0C0'><tr><td width='100%'><font face='Verdana, Arial' size=5 color='#FFFFFF'><b>&nbsp;Results</b></font></td></tr></table>",0)
now= new Date()
cachewrite("<small><p>"+fill((now.getMonth()+1),2)+"/"+fill(now.getDate(),2)+"/"+now.getYear()+"&nbsp;&nbsp;"+fill(now.getHours(),2)+":"+fill(now.getMinutes(),2)+"</p>",0)
cachewrite("<b>Elasticity Lesson One</b><br><br>\n",0);
if (udat.length>0) {
cachewrite("<b>Information</b><br>\n",0);
for (i=0; i<udat.length; i++) cachewrite(udat[i],0);}
if (opera7 && multipage) {
for (i=0; i<questions.length; i++) {
id=document.getElementById("q"+(i+1));
id2=document.getElementById("q"+(i+1)+"a");
id.style.display=id2.style.display="block";}}

for (i=0; i<questions.length; i++) {
if (opera && multipage) {
id=document.getElementById("q"+(i+1));
id2=document.getElementById("q"+(i+1)+"a");
id.style.visibility=id2.style.visibility="visible";}
type=questions[i].type;
if (type==1) multi=1;
else multi=0;
isnull=true;
iscorrect=false;iswrong=false;
selection=0;
evaluation=0;
mycomment="";
for (ii=0; ii<wapf.elements.length; ii++) {
if (CheckQName(wapf,ii,i,multi,selection)) {
if (type>=3 && wapf.elements[ii].value!="") {
isnull=false;
if (wapf.elements[ii].value.toLowerCase()==questions[i].corrects.toLowerCase()) iscorrect=true;
else iswrong=true;
++selection;}
else if (wapf.elements[ii].checked) {
if (questions[i].score!="") evaluation+=questions[i].score[selection];
if (isnull) isnull=false;
if (questions[i].corrects[selection]=="1") iscorrect=(iswrong==false)?true:false;
else {
iswrong=true;
if (multi && questions[i].corrects!='') errore(questions[i].qname,"The checkbox  <i>"+questions[i].response[selection]+"</i>  shouldn't have been selected.",questions[i].explan)
}
if (questions[i].comment!="" && questions[i].comment[selection]!="")
mycomment+=((iscorrect || questions[i].corrects=='')?"<b>"+questions[i].qname+"</b><br>":"")+"<small>"+questions[i].comment[selection]+"</small><br>";
} else {
if (questions[i].corrects[selection]=="1") {
iswrong=true;
if (multi && questions[i].corrects!='') errore(questions[i].qname,"The checkbox  <i>"+questions[i].response[selection]+"</i>  should have been selected.",questions[i].explan);
}}
++selection;
}}
if (multi==false && (isnull || iswrong)) {
var okresp="", z;
if (type>=3) okresp=questions[i].corrects;
else {
for (z=0; z<questions[i].corrects.length; z++) {
if (questions[i].corrects[z]==1) {
okresp=questions[i].response[z];
break;
}}}
if (okresp!="") errore(questions[i].qname,"The right answer was <i>"+okresp+".</i>",questions[i].explan);
}
if (mycomment!="") cachewrite(mycomment,2);
if (questions[i].corrects!="") ++qright;
if (isnull) evaluation+=questions[i].ifnull;
else if (iswrong) evaluation+=questions[i].ifwrong;
else if (iscorrect) evaluation+=questions[i].ifcorrect;
total+=evaluation;}
if (qright==0) global[1]="<br>";
if (errori) cachewrite("<br><b>You have made "+errori+" "+(errori==1?"error":"errors")+".</b>",2);
cachewrite("<br><b>Total score: "+total+".</b><br>",2);

cachewrite("</small><hr noshade><center><form>",2)
printest=(((navigator.appName=="Netscape") && (navigator.appVersion.charAt(0)>="4")) || (testIE5plus() == true))? "print()": "alert('This button can be used with Netscape Navigator 4 or Microsoft Internet Explorer 5 only. If you want to print with other browsers, please select the Print command in the File menu.')"
cachewrite("<input type='button' value='Print...' onClick='"+printest+"'>&nbsp;&nbsp;&nbsp;&nbsp;",2)
cachewrite("<input type='button' value='Close' onClick='window.close()'></form></center>",2)
cachewrite(aknw,2)
winr=window.open('','wapres', 'titlebar=1,location=0,directories=0,menubar=1,toolbar=0,scrollbars=1,resizable=1,status=1')
for (i=0; i<3; i++) winr.document.write(global[i]);winr.document.close()
if ((opera || opera7) && multipage) {
document.forms[0].elements[0].value='Print...';
document.forms[0].elements[1].value='Close';
for (i=0; i<questions.length-1; i++) {
id=document.getElementById("q"+(i+1));
id2=document.getElementById("q"+(i+1)+"a");
opera?id.style.visibility=id2.style.visibility="hidden":id.style.display=id2.style.display="none";}}
}
aknw="<br><p align='center'><small><small>Created and managed with <a title='Click here to visit WebQuiz site' href='http://www.smartlite.it/go.asp?OLDLP' target = '_blank'>SmartLite WebQuiz</a></small></small></p>"

