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("All of the goods and services that are consumed by that country in a year","All of the goods and services that are produced by that country in the year excluding exports","All of the goods and services that are produced in that country in the year excluding imports","All of the goods and services that are produced in that country in a year","All of the goods manufactured in that country in a year")
corr=new Array("0","0","0","1","0")
comm=""
valu=""
quest001 = new Question(
"Question 1",
0,
"<font face=\"Times New Roman\" size=\"5\">The annual Gross Domestic Product of a country a measure of</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("a drop in price level","a recession","economic growth","an inward movement of the production possibilities fromtier","inflation")
corr=new Array("0","1","0","0","0")
comm=""
valu=""
quest002 = new Question(
"Question 2",
0,
"Given no changes in the factors of production, a decrease in real gross domestic product for two consecutive quarters indicates",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("Actual GDP at any given time","The level of GDP a country would like to achieve if it had more labor and capital","The level of GDP that a country could achieve if all of its labor and capital were employed efficiently","The level of economic growth that the country would like to achieve","The level of GDP that can never be achieved")
corr=new Array("0","0","1","0","0")
comm=""
valu=""
quest003 = new Question(
"Question 3",
0,
"<font face=\"Times New Roman\" size=\"5\">The <b>potential GDP is the</b></font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("The amount of GDP that each individual actually consumes","The amount of GDP that each individual actually produces","The total GDP divided by the population","The total population divided by the GDP","The total GDP divided by the total capital")
corr=new Array("0","0","1","0","0")
comm=""
valu=""
quest004 = new Question(
"Question 4",
0,
"<font face=\"Times New Roman\" size=\"5\">Per capita GDP is:</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("The real value of the U.S. gross domestic product had to be $12456 billion dollars","The value of the U.S. domestic product in current dollars was $12456 billion dollars","U. S. consumers consumed $12456 billion dollars of goods and services","In 2005, the U.S. GDP did not reach a trillion dollars","In 2005, the national income of the U. S. had to exceed $12456 billion dollars because households save some money")
corr=new Array("0","1","0","0","0")
comm=""
valu=""
quest005 = new Question(
"Question 5",
0,
"I<font face=\"Times New Roman\" size=\"4\">n the year 2005, the U.S. nominal Gross Domestic Product was $12456 billion dollars. This means that</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("The difference between what foreign owned companies produce within the domestic economy and what domestic companies produce outside the country","The GDP minus exports","The GDP minus imports","The GDP plus exports","The GDP plus imports")
corr=new Array("1","0","0","0","0")
comm=""
valu=""
quest006 = new Question(
"Question 6",
0,
"<font face=\"Times New Roman\" size=\"5\">The difference between Gross Domestic Product and Gross National Product is</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("not expand its capital stock","expand its capital stock","increase its capital to labor ratio","shift its production possibilities curve to the right","shift its production possibilities curve inward")
corr=new Array("1","0","0","0","0")
comm=""
valu=""
quest007 = new Question(
"Question 7",
0,
"<font face=\"Times New Roman\" size=\"5\">If a country had no change in the workforce or technology and had $1600 billion dollars of depreciation in a year and $1600 billion dollars of Investment in a year, it would</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("households","business","government","households and business","households, business, and government")
corr=new Array("0","0","0","0","1")
comm=""
valu=""
quest008 = new Question(
"Question 8",
0,
"<font face=\"Times New Roman\" size=\"5\">Net National Income is the income to</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("the total revenue of corporations","the total revenue of corporations minus dividends","the total revenue of corporations minus total expenses","the total revenue of corporations minus total expenses and dividends","retained earnings")
corr=new Array("0","0","1","0","0")
comm=""
valu=""
quest009 = new Question(
"Question 9",
0,
"<font face=\"Times New Roman\" size=\"5\">Corporate profit is</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("corporate profits minus expenses","corporate revenue minus dividends","corporate profits minus dividends","corporate profits plus dividends","corporate profits before expenses")
corr=new Array("0","0","1","0","0")
comm=""
valu=""
quest010 = new Question(
"Question 10",
0,
"<font face=\"Times New Roman\" size=\"5\">Retained earnings are</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("government goods and services provided to households and businesses and paid for exclusively by tax dollars","Government goods and services provided exclusively to households","Government goods and services provided exclusively to business","government goods and services provided to households and business for which they are charged a fee","Government goods and services that are not a part of GDP")
corr=new Array("0","0","0","1","0")
comm=""
valu=""
quest011 = new Question(
"Question 11",
0,
"<font face=\"Times New Roman\" size=\"5\">Government enterprises are</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("only wages received","only wages and profits from noncorporate businesses","only wages, profits from noncorprate businesses, and dividends received by households","wages, profits from non corporate businesses, dividends and interest received by households","wages, profits from non-corporate businesses, dividends and interest received by households, and transfer payments")
corr=new Array("0","0","0","0","1")
comm=""
valu=""
quest012 = new Question(
"Question 12",
0,
"<font face=\"Times New Roman\" size=\"5\">Which of the following most completely and correctly describes personal income?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("If businesses want to spend on Investment without borrowing or selling new shares, they must limit the spending to the capital consumption allowance.","If businesses want to spend on Investment without borrowing or selling new shares, they must limit the expansion to the capital consumption allowance and accumulated undistributed corporate profits","If business want to spend on Investnent without borrowing, they must limit the expansion to the capital consumption allowance (depreciation)","If businesses want to spend on replacement Investment without borrowing, they must spend all of the capital consumption allowance and undistributed corporate profits","If businesses spend all of its capital consumption and undistributed corporate profits on Investment, there must be an increase in the capital stock of the country")
corr=new Array("0","1","0","0","0")
comm=""
valu=""
quest013 = new Question(
"Question 13",
0,
"<font face=\"Times New Roman\" size=\"5\">Which of the following statements is accurate?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("receiving transfer payments","borrowing","moonlighting","earning foreign income","earning dividend income")
corr=new Array("0","1","0","0","0")
comm=""
valu=""
quest014 = new Question(
"Question 14",
0,
"<font face=\"Times New Roman\" size=\"5\">One of the ways households can spend more on consumption than they receive as personal income in a given year is by</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("consumption equals disposable income","savings equals disposable income","personal income tax equals disposable income","borrowing equals disposable income","transfer payments equals disposable income")
corr=new Array("0","0","1","0","0")
comm=""
valu=""
quest015 = new Question(
"Question 15",
0,
"<font face=\"Times New Roman\" size=\"5\">Personal Income minus</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("consume","consume or save","consume, save, or buy stock","consume, save, or buy assets","consume, save, buy assets, buy stock")
corr=new Array("0","1","0","0","0")
comm=""
valu=""
quest016 = new Question(
"Question 16",
0,
"<font face=\"Times New Roman\" size=\"5\">Which of the following best explains what households can do with disposable income?</font>",
resp,
comm,
corr,
"",
valu,
1,
0,
0,
"");

resp=new Array("only the savings of households","the savings of households and businesses","the savings of households, businesses, and government surpluses","the savings of housholds, businesses, government surpluses, and money borrowed from foreign sources","household savings, business savings, and government deficits")
corr=new Array("0","0","1","0","0")
comm=""
valu=""
quest017 = new Question(
"Question 17",
0,
"<font face=\"Times New Roman\" size=\"5\">National savings includes</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)

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>National Accounting Test</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>"