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("A. the item that has less quality than the other items of output","B. the total ouput as an additional worker is hired.","C. the total selling revenue as an additional worker is hired.","D. the change in total output that is produced when 1 additional worker is hired.")
corr=new Array("0","0","0","1")
comm=""
valu=""
quest001 = new Question(
"Question 1",
0,
"<font face=\"Times New Roman\" size=\"5\">1. The marginal product of an output is the:</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("A. the additional sales revenue that occurs from the additional output created by 1 more worker.","B. the total sales revenue created from the sale of all goods produced.","C. The total profits created from the sale of all goods produced.","D. The total resource costs of all goods produced.")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest002 = new Question(
"Question 2",
0,
"<font face=\"Times New Roman\" size=\"5\">2. The total revenue product is:</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("A. Change in total revenue resulting from the change of output produced from 1 more worker.","B. Change in total resource cost resulting from the hiring of one more additional worker.","C. The total revenue minus the total resource cost.","D. The change in revenue that occurs as one more unit is produced.")
corr=new Array("1","0","0","0")
comm=""
valu=""
quest003 = new Question(
"Question 3",
0,
"<font face=\"Times New Roman\" size=\"5\">3. The marginal revenue product is the:</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("A. the change in selling price as one more unit is sold.","B. the change in revenue as the output from one more worker is sold.","C. the cost of hiring all the workers used in the production of a product.","D. the cost of hiring one more unit of input.")
corr=new Array("0","0","0","1")
comm=""
valu=""
quest004 = new Question(
"Question 4",
0,
"<font face=\"Times New Roman\" size=\"5\">4. The marginal resource cost is:</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("A. Selling price","B. wage paid to a worker","C. a fixed cost","D. profit from the sale of a good")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest005 = new Question(
"Question 5",
0,
"<font face=\"Times New Roman\" size=\"5\">5. The resource cost is the:</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("A. marginal revenue = marginal cost rule","B. marginal revenue product = marginal resource cost rule","C. marginal revenue = marginal profit rule","D. marginal resource cost = wage rule")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest006 = new Question(
"Question 6",
0,
"<font face=\"Times New Roman\" size=\"5\">6. The profit maximizing rule for determining the most profitable number of workers to hire is:</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("A. I only","B. II only","C. III only","D. I and II","E. I and III")
corr=new Array("0","0","0","1","0")
comm=""
valu=""
quest007 = new Question(
"Question 7",
0,
"<font face=\"Times New Roman\" size=\"5\">7. The wage rate can be considered:</font><br><font face=\"Times New Roman\" size=\"5\">I. the resource cost</font><br><font face=\"Times New Roman\" size=\"5\">II. the factor cost</font><br><font face=\"Times New Roman\" size=\"5\">III. the product cost</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("A. 120","B. 315","C. 100","D. 95")
corr=new Array("0","0","0","1")
comm=""
valu=""
quest008 = new Question(
"Question 8",
0,
"<font face=\"Times New Roman\" size=\"5\">8. Refer to the data for the Hoochie Koochie Dress Company. The marginal product of the 3rd worker is:</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"HoochieKoochieB.JPG");

resp=new Array("A. The 2nd worker","B. The 3rd worker","C. The 4th worker","D. The 5th worker")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest009 = new Question(
"Question 9",
0,
"<font face=\"Times New Roman\" size=\"5\">9. Refer to the production data for the Hoochie Koochie Dress Co., diminishing marginal productivity starts when which worker is hired?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"HoochieKoochieB.JPG");

resp=new Array("A. 480 units","B. 50 units","C. 20 units","D. 80 units")
corr=new Array("0","0","1","0")
comm=""
valu=""
quest010 = new Question(
"Question 10",
0,
"<font face=\"Times New Roman\" size=\"5\">10. Refer to the production data for the Hoochie Koochie Co. The marginal product of the 6th worker is:</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"HoochieKoochieB.JPG");

resp=new Array("A. 3 workers","B. 4 workers","C. 5 workers","D. 6 workers")
corr=new Array("0","0","1","0")
comm=""
valu=""
quest011 = new Question(
"Question 11",
0,
"<font face=\"Times New Roman\" size=\"5\">11. Given the production data for the company, the Hoochie Koochie Company should hire how many workers if it wishes to maximize profit?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"HoochieKoochieB.JPG");

resp=new Array("A. $800","B. $400","C. $190","D. $170")
corr=new Array("0","0","0","1")
comm=""
valu=""
quest012 = new Question(
"Question 12",
0,
"<font face=\"Times New Roman\" size=\"5\">12. Refer to the data for the Hoochie Koochie Co. The marginal revenue product of the 4th worker is:</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"HoochieKoochieB.JPG");

resp=new Array("A. $400","B. $800","C. $25","D. $1600")
corr=new Array("0","0","0","1")
comm=""
valu=""
quest013 = new Question(
"Question 13",
0,
"<font face=\"Times New Roman\" size=\"5\">13. Refer to the information for the Trouble Trouser, Co. The daily wage rate is $100 and the output given is the daily output. What is the total revenue product if the firm hires 4 workers?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"ttc.JPG");

resp=new Array("A. The company is a perfect competitor.","B. The company has a perfectly elastic demand curve.","C. The company is an imperfect competitor.","D. The company can never have an economic profit.")
corr=new Array("0","0","1","0")
comm=""
valu=""
quest014 = new Question(
"Question 14",
0,
"<font face=\"Times New Roman\" size=\"5\">14. Refer to the data for the Trouble Trouser, Co. Which of the following is a true statement regarding this company?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"ttc.JPG");

resp=new Array("A. The company is a perfect competitor.","B. The company faces a downward sloping demand curve.","C. The company has a differentiated product.","D. The company can never experience an economic profit.")
corr=new Array("1","0","0","0")
comm=""
valu=""
quest015 = new Question(
"Question 15",
0,
"<font face=\"Times New Roman\" size=\"5\">15. Refer to the data for the Hoochie Koochie, Co. Which of the following statements is correct?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"HoochieKoochieB.JPG");

resp=new Array("A. 315","B. 95","C. 85","D. 255")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest016 = new Question(
"Question 16",
0,
"<font face=\"Times New Roman\" size=\"5\">16. Refer to the data for the Trouble Trousers, Co. What is the marginal product of the 3rd worker?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"ttc.JPG");

resp=new Array("A. $450","B. $950","C. $1350","D. $-250")
corr=new Array("0","0","1","0")
comm=""
valu=""
quest017 = new Question(
"Question 17",
0,
"<font face=\"Times New Roman\" size=\"5\">17. Refer to the data for the Trouble Trouser Co. What is the total revenue product if 5 workers are hired?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"ttc.JPG");

resp=new Array("A. $700","B. $1350","C. $720","D. $620")
corr=new Array("0","0","0","1")
comm=""
valu=""
quest018 = new Question(
"Question 18",
0,
"<font face=\"Times New Roman\" size=\"5\">18. Refer to the data for the Trouble Trouser, Co. What is the marginal revenue product of the 2nd worker?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"ttc.JPG");

resp=new Array("A. 2 workers","B. 3 workers","C. 4 workers","D. 5 workers")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest019 = new Question(
"Question 19",
0,
"<font face=\"Times New Roman\" size=\"5\">19. Refer to the data for the Trouble Trouser, Co. The daily wage is $100 and the output given is the daily output. If this company wants to maximize profits, it will hire how many workers?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"ttc.JPG");

resp=new Array("A. 450 units","B. 60 units","C. 30 units","D. 100 units")
corr=new Array("0","1","0","0")
comm=""
valu=""
quest020 = new Question(
"Question 20",
0,
"<font face=\"Times New Roman\" size=\"5\">20. Refer to the data for the Hoochie Koochie Co. Assume that the 5th worker is Arnold. How much additional product is added to the output of the company when Arnold is hired?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"HoochieKoochieB.JPG");

resp=new Array("A. Yes and the total profit will increase.","B. Yes but the total profit will decrease.","C. No and the total profit will increase.","D. No and the total profit will decrease.")
corr=new Array("1","0","0","0")
comm=""
valu=""
quest021 = new Question(
"Question 21",
0,
"<font face=\"Times New Roman\" size=\"5\">21. Has Arnold (the 5th worker) increased the output of the company and will the company's total profit increase or decrease?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"HoochieKoochieB.JPG");

resp=new Array("A. Arnold is lazy.","B. Arnold is careless.","C. Arnold is not properly trained.","D. The firm did not add to the fixed resources when Arnold was hired.")
corr=new Array("0","0","0","1")
comm=""
valu=""
quest022 = new Question(
"Question 22",
0,
"<font face=\"Times New Roman\" size=\"5\">22. Refer to the data of the Hoochie Koochie Co. Arnold the 5th worker hired brings in less marginal profit to the company than the 4th worker. The reason for this is:</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"HoochieKoochieB.JPG");

questions = new Array (
quest001,quest002,quest003,quest004,quest005,quest006,quest007,quest008,quest009,quest010,quest011,quest012,quest013,quest014,quest015,quest016,quest017,quest018,quest019,quest020,quest021,quest022)

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>Factor Market Quiz</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>"

