pascal第12讲 for循环语句.mht

学习Pascal程序设计的基础教材

From: <由 Microsoft Internet Explorer 5 保存>
Subject: =?gb2312?B?ufPW3cqhza3IyrXa0rvW0NGn?=
Date: Fri, 30 Nov 2007 12:14:46 +0800
MIME-Version: 1.0
Content-Type: multipart/related;
	type="text/html";
	boundary="----=_NextPart_000_0030_01C8334A.990E5930"
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.2180

This is a multi-part message in MIME format.

------=_NextPart_000_0030_01C8334A.990E5930
Content-Type: text/html;
	charset="gb2312"
Content-Transfer-Encoding: base64
Content-Location: http://www.tryz.com.cn/yz/PRINTLR.ASP?ID=5816

PCFET0NUWVBFIEhUTUwgUFVCTElDICItLy9XM0MvL0RURCBIVE1MIDQuMCBUcmFuc2l0aW9uYWwv
L0VOIj4NCjxIVE1MPjxIRUFEPjxUSVRMRT6589bdyqHNrcjKtdrSu9bQ0ac8L1RJVExFPg0KPE1F
VEEgY29udGVudD0iTVNIVE1MIDYuMDAuMjkwMC4zMTU3IiBuYW1lPUdFTkVSQVRPUj4NCjxNRVRB
IGNvbnRlbnQ9RnJvbnRQYWdlLkVkaXRvci5Eb2N1bWVudCBuYW1lPVByb2dJZD4NCjxNRVRBIGh0
dHAtZXF1aXY9Q29udGVudC1UeXBlIGNvbnRlbnQ9InRleHQvaHRtbDsgY2hhcnNldD1nYjIzMTIi
PjwvSEVBRD4NCjxCT0RZPg0KPFRBQkxFIGhlaWdodD0yNCBjZWxsU3BhY2luZz0wIGNlbGxQYWRk
aW5nPTAgd2lkdGg9IjEwMCUiPg0KICA8VEJPRFk+DQogIDxUUj4NCiAgICA8VEQgYWxpZ249bWlk
ZGxlPjxGT05UIHN0eWxlPSJGT05ULVNJWkU6IDI0cHQiIA0KICAgICAgY29sb3I9IzAwMDAwMD5Q
QVNDQUy12squtv69sqO6Rk9S0a27t9PvvuQ8L0ZPTlQ+PC9URD48L1RSPjwvVEJPRFk+PC9UQUJM
RT48QlI+DQo8UCBhbGlnbj1jZW50ZXI+PFNUUk9ORz5GT1LRrbu30+++5CA8L1NUUk9ORz48L1A+
DQo8UD4mbmJzcDsmbmJzcDsmbmJzcDsgDQrHsMPmy/m8xrXEwb249tPvvuS2vMrH1NrOtNaq0a27
t7TOyv21xMfpv/bPwrb408O1xNGtu7fT777ko6y1q9Tas8zQ8tbQo6zI57n7ztLDx9LRvq3WqrXA
0a27t7XEtM7K/bb4wLSx4LPM0PK1xLuwo6y+zb/J0tTKudPDIEZPUtGtu7fT777ko6zV4tKyyscg
DQpQQVNDQUy8sMbky/y437y20+/R1NbQ08O1w9futuC1xNPvvuSho8bk0++3qLjxyr3T0MG91taj
rMjnz8KjujwvUD4NCjxQPigxKSDU9sG/zqogMaO6PC9QPg0KPFA+PFNQQU4gY2xhc3M9c3R5bGUx
PjxGT05UIGNvbG9yPSMwMDAwZmY+Zm9yILHkwb/D+6O6PbP11rUgdG8g1tXWtSBkbyANCmJlZ2lu
PEJSPqGh0+++5NDywdCjqNGtu7fM5aOpo7s8QlI+ZW5kOzwvRk9OVD48L1NQQU4+PC9QPg0KPFA+
KDIpINT2wb/OqiAtMaO6PC9QPg0KPFA+PEZPTlQgY29sb3I9IzAwMDBmZj48U1BBTiBjbGFzcz1z
dHlsZTE+Zm9yILHkwb/D+6O6PbP11rUgZG93bnRvINbV1rUgZG8gDQpiZWdpbjxCUj6hodPvvuTQ
8sHQo6jRrbu3zOWjqaO7PEJSPmVuZDs8L1NQQU4+PEJSPjwvRk9OVD48L1A+DQo8UD6x5MG/w/u1
xMDg0M3TybPM0PLNt7K/1tC2qNLlo6y2+Mbks/XWtaGi1tXWtbHY0Ou6zcv8ysfNrNK7wODQzaGj
uMOx5MG/tcTA4NDNysfE3MrH09DQ8sr9vt3A4NDNoaM8L1A+DQo8UD7Jz8r2wb3W1rjxyr22vMrH
08Ox5MG/tcSz9da10+vW1da1wLS55rao0a27t7XEtM7K/aGjyOfS1M/Cwb249tChs8zQ8qO6PC9Q
Pg0KPFRBQkxFIGNlbGxTcGFjaW5nPTAgY2VsbFBhZGRpbmc9MTAgYm9yZGVyPTE+DQogIDxUQk9E
WT4NCiAgPFRSIGNsYXNzPXByb2dyYW1fdGV4dD4NCiAgICA8VEQgdkFsaWduPXRvcCB3aWR0aD0y
MzUgaGVpZ2h0PTE2OT4NCiAgICAgIDxQPlZhciBJOmludGVnZXI7PEJSPkJlZ2luPEJSPkZvciBJ
Oj0xIHRvIDUgZG8gDQogICAgICBiZWdpbjxCUj6hoVdyaXRlKEkpOzxCUj5FbmQ7PEJSPkVuZC48
QlI+1MvQ0L3hufujujxCUj4xMjM0NTwvUD48L1REPg0KICAgIDxURCB2QWxpZ249dG9wIHdpZHRo
PTIzNz4NCiAgICAgIDxQPlZhciBJOmludGVnZXI7PEJSPkJlZ2luPEJSPkZvciBJOj01IGRvd250
byAxIGRvIA0KICAgICAgYmVnaW48QlI+oaFXcml0ZShJKTs8QlI+RW5kOzxCUj5FbmQuPEJSPtTL
0NC94bn7o7o8QlI+NTQzMjE8L1A+PC9URD48L1RSPjwvVEJPRFk+PC9UQUJMRT4NCjxQPtPJyc+/
ydLUv7Sz9iBGT1LRrbu3tcTX99PDoaM8L1A+DQo8UD5bwP0gNaGiIDVdo7q007z8xczK5Mjr0ru4
9tfWt/u0rqOssNHL/LC01f3Q8rywxObQ8rfWsfDK5LP2o7o8L1A+DQo8UD48U1BBTiBjbGFzcz1w
cm9ncmFtX3RleHQ+dXNlcyBjcnQ7PEJSPnZhciANCnM6c3RyaW5nOzxCUj5sLEk6aW50ZWdlcjs8
QlI+YmVnaW48QlI+Y2xyc2NyOzxCUj53cml0ZSihrlBsZWFzZSBpbnB1dCB0aGUgDQpzdHJpbmc6
oa8pOzxCUj5yZWFkbG4ocyk7PEJSPmw6PWxlbmd0aChzKTs8QlI+Zm9yIEk6PTEgdG8gbCBkbyAN
CmJlZ2luPEJSPqGhd3JpdGUoc1tJXSk7PEJSPmVuZDs8QlI+d3JpdGVsbjsgPEJSPmZvciBJOj1s
IGRvd250byAxIGRvIA0KYmVnaW48QlI+oaF3cml0ZShzW0ldKTs8QlI+ZW5kOzxCUj5lbmQuPC9T
UEFOPjxCUj5bwP0gNaGiIDZdvMbL4yA8SU1HIGhlaWdodD0yMSANCnNyYz0iaHR0cDovL3d3dy53
cHl6Lm5ldC9ub2lwL2ltYWdlcy80LTNfY2xpcF9pbWFnZTAwMi5naWYiIHdpZHRoPTExNz48L1A+
DQo8UD48U1BBTiBjbGFzcz1wcm9ncmFtX3RleHQ+dXNlcyBjcnQ7PEJSPnZhciANCnMsYTppbnRl
Z2VyOzxCUj5iZWdpbjxCUj5jbHJzY3I7PEJSPnM6PTA7PEJSPmZvciBhOj0xIHRvIDEwIGRvIA0K
YmVnaW48QlI+oaFzOj1zK2EqYTs8QlI+ZW5kOzxCUj53cml0ZWxuKHMpOzxCUj5lbmQuPC9TUEFO
PjxCUj5bwP0gNaGiIDddo7q8xsvjo7ogDQoxKzMrNSs3K6Gtoa0gMTAxtcTWtaO6PC9QPg0KPFA+
PFNQQU4gY2xhc3M9cHJvZ3JhbV90ZXh0PnVzZXMgY3J0OzxCUj52YXIgDQptLG46aW50ZWdlcjs8
QlI+YmVnaW48QlI+Y2xyc2NyOzxCUj5tOj0wOzxCUj5mb3Igbjo9MCB0byA1MCBkbyANCmJlZ2lu
PEJSPqGhbTo9bSsoMipuKzEpOzxCUj5lbmQ7PEJSPndyaXRlbG4obSk7PEJSPmVuZC48L1NQQU4+
PEJSPsfrtPO80tei0uLJz8r2s8zQ8tbQtcS8uLj20KG8vMfJo6zSu7j2yscgDQpGT1IgTqO6ID0w
IFRPIDUwo6y5stGtu7cgNTG0zqO70ru49srHIE2juiA9TSujqCAyKk4rMaOpo6zG5MrHtcQgMipO
KzG1w7W9tcTKx9K70PLB0LXExubK/aGjPC9QPg0KPFAgYWxpZ249Y2VudGVyPjxTVFJPTkc+tuDW
2NGtu7fT777kIDwvU1RST05HPjwvUD4NCjxQPrbg1tjRrbu30+++5Ly00a27t8e2zNejrNKyvs3K
x9K7uPbRrbu30+++5LXE0a27t8zl1tC7udPQ0a27t9PvvuShozwvUD4NCjxQPlvA/SA1oaIgOF2x
4LPM0PK08tOhvsW+xbPLt6ix7aO6PC9QPg0KPFA+PFNQQU4gY2xhc3M9cHJvZ3JhbV90ZXh0PnVz
ZXMgY3J0OzxCUj52YXIgDQpJLGo6aW50ZWdlcjs8QlI+YmVnaW48QlI+Y2xyc2NyOzxCUj5mb3Ig
STo9MSB0byA5IGRvIGJlZ2luPEJSPqGhZm9yIGo6PTEgdG8gOSBkbyANCmJlZ2luPEJSPqGhoaF3
cml0ZShqOjEsoa8qoa8saToxLKGvPaGvLEkqajoyKTs8QlI+oaFlbmQ7PEJSPqGhd3JpdGVsbjs8
QlI+ZW5kOzxCUj5lbmQuPC9TUEFOPjxCUj7Uy9DQveG5+6O6PC9QPg0KPFRBQkxFIGNlbGxTcGFj
aW5nPTAgY2VsbFBhZGRpbmc9MCBib3JkZXI9MD4NCiAgPFRCT0RZPg0KICA8VFI+DQogICAgPFRE
IHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD4xKjE9IDE8L1A+PC9URD4NCiAgICA8VEQg
dkFsaWduPXRvcCB3aWR0aD02MD4NCiAgICAgIDxQPjIqMT0gMjwvUD48L1REPg0KICAgIDxURCB2
QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+MyoxPSAzPC9QPjwvVEQ+DQogICAgPFREIHZB
bGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD40KjE9IDQ8L1A+PC9URD4NCiAgICA8VEQgdkFs
aWduPXRvcCB3aWR0aD02MD4NCiAgICAgIDxQPjUqMT0gNTwvUD48L1REPg0KICAgIDxURCB2QWxp
Z249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+NioxPTY8L1A+PC9URD4NCiAgICA8VEQgdkFsaWdu
PXRvcCB3aWR0aD02MD4NCiAgICAgIDxQPjcqMT0gNzwvUD48L1REPg0KICAgIDxURCB2QWxpZ249
dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+OCoxPSA4PC9QPjwvVEQ+DQogICAgPFREIHZBbGlnbj10
b3Agd2lkdGg9NjA+DQogICAgICA8UD45KjE9IDk8L1A+PC9URD48L1RSPg0KICA8VFI+DQogICAg
PFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD4xKjI9MjwvUD48L1REPg0KICAgIDxU
RCB2QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+MioyPSA0PC9QPjwvVEQ+DQogICAgPFRE
IHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD4zKjI9IDY8L1A+PC9URD4NCiAgICA8VEQg
dkFsaWduPXRvcCB3aWR0aD02MD4NCiAgICAgIDxQPjQqMj0gODwvUD48L1REPg0KICAgIDxURCB2
QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+NSoyPTEwPC9QPjwvVEQ+DQogICAgPFREIHZB
bGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD42KjI9MTI8L1A+PC9URD4NCiAgICA8VEQgdkFs
aWduPXRvcCB3aWR0aD02MD4NCiAgICAgIDxQPjcqMj0xNDwvUD48L1REPg0KICAgIDxURCB2QWxp
Z249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+OCoyPTE2PC9QPjwvVEQ+DQogICAgPFREIHZBbGln
bj10b3Agd2lkdGg9NjA+DQogICAgICA8UD45KjI9MTg8L1A+PC9URD48L1RSPg0KICA8VFI+DQog
ICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD4xKjM9MzwvUD48L1REPg0KICAg
IDxURCB2QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+MiozPSA2PC9QPjwvVEQ+DQogICAg
PFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD4zKjM9IDk8L1A+PC9URD4NCiAgICA8
VEQgdkFsaWduPXRvcCB3aWR0aD02MD4NCiAgICAgIDxQPjQqMz0xMjwvUD48L1REPg0KICAgIDxU
RCB2QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+NSozPTE1PC9QPjwvVEQ+DQogICAgPFRE
IHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD42KjM9MTg8L1A+PC9URD4NCiAgICA8VEQg
dkFsaWduPXRvcCB3aWR0aD02MD4NCiAgICAgIDxQPjcqMz0yMTwvUD48L1REPg0KICAgIDxURCB2
QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+OCozPTI0PC9QPjwvVEQ+DQogICAgPFREIHZB
bGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD45KjM9Mjc8L1A+PC9URD48L1RSPg0KICA8VFI+
DQogICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD4xKjQ9NDwvUD48L1REPg0K
ICAgIDxURCB2QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+Mio0PSA4PC9QPjwvVEQ+DQog
ICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD4zKjQ9MTI8L1A+PC9URD4NCiAg
ICA8VEQgdkFsaWduPXRvcCB3aWR0aD02MD4NCiAgICAgIDxQPjQqND0xNjwvUD48L1REPg0KICAg
IDxURCB2QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+NSo0PTIwPC9QPjwvVEQ+DQogICAg
PFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD42KjQ9MjQ8L1A+PC9URD4NCiAgICA8
VEQgdkFsaWduPXRvcCB3aWR0aD02MD4NCiAgICAgIDxQPjcqND0yODwvUD48L1REPg0KICAgIDxU
RCB2QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+OCo0PTMyPC9QPjwvVEQ+DQogICAgPFRE
IHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD45KjQ9MzY8L1A+PC9URD48L1RSPg0KICA8
VFI+DQogICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD4xKjU9NTwvUD48L1RE
Pg0KICAgIDxURCB2QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+Mio1PTEwPC9QPjwvVEQ+
DQogICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD4zKjU9MTU8L1A+PC9URD4N
CiAgICA8VEQgdkFsaWduPXRvcCB3aWR0aD02MD4NCiAgICAgIDxQPjQqNT0yMDwvUD48L1REPg0K
ICAgIDxURCB2QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+NSo1PTI1PC9QPjwvVEQ+DQog
ICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD42KjU9MzA8L1A+PC9URD4NCiAg
ICA8VEQgdkFsaWduPXRvcCB3aWR0aD02MD4NCiAgICAgIDxQPjcqNT0zNTwvUD48L1REPg0KICAg
IDxURCB2QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+OCo1PTQwPC9QPjwvVEQ+DQogICAg
PFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD45KjU9NDU8L1A+PC9URD48L1RSPg0K
ICA8VFI+DQogICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD4xKjY9NjwvUD48
L1REPg0KICAgIDxURCB2QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+Mio2PTEyPC9QPjwv
VEQ+DQogICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD4zKjY9MTg8L1A+PC9U
RD4NCiAgICA8VEQgdkFsaWduPXRvcCB3aWR0aD02MD4NCiAgICAgIDxQPjQqNj0yNDwvUD48L1RE
Pg0KICAgIDxURCB2QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+NSo2PTMwPC9QPjwvVEQ+
DQogICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD42KjY9MzY8L1A+PC9URD4N
CiAgICA8VEQgdkFsaWduPXRvcCB3aWR0aD02MD4NCiAgICAgIDxQPjcqNj00MjwvUD48L1REPg0K
ICAgIDxURCB2QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+OCo2PTQ4PC9QPjwvVEQ+DQog
ICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD45KjY9NTQ8L1A+PC9URD48L1RS
Pg0KICA8VFI+DQogICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD4xKjc9Nzwv
UD48L1REPg0KICAgIDxURCB2QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+Mio3PTE0PC9Q
PjwvVEQ+DQogICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD4zKjc9MjE8L1A+
PC9URD4NCiAgICA8VEQgdkFsaWduPXRvcCB3aWR0aD02MD4NCiAgICAgIDxQPjQqNz0yODwvUD48
L1REPg0KICAgIDxURCB2QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+NSo3PTM1PC9QPjwv
VEQ+DQogICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD42Kjc9NDI8L1A+PC9U
RD4NCiAgICA8VEQgdkFsaWduPXRvcCB3aWR0aD02MD4NCiAgICAgIDxQPjcqNz00OTwvUD48L1RE
Pg0KICAgIDxURCB2QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+OCo3PTU2PC9QPjwvVEQ+
DQogICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD45Kjc9NjM8L1A+PC9URD48
L1RSPg0KICA8VFI+DQogICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD4xKjg9
ODwvUD48L1REPg0KICAgIDxURCB2QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+Mio4PTE2
PC9QPjwvVEQ+DQogICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD4zKjg9MjQ8
L1A+PC9URD4NCiAgICA8VEQgdkFsaWduPXRvcCB3aWR0aD02MD4NCiAgICAgIDxQPjQqOD0zMjwv
UD48L1REPg0KICAgIDxURCB2QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+NSo4PTQwPC9Q
PjwvVEQ+DQogICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD42Kjg9NDg8L1A+
PC9URD4NCiAgICA8VEQgdkFsaWduPXRvcCB3aWR0aD02MD4NCiAgICAgIDxQPjcqOD01NjwvUD48
L1REPg0KICAgIDxURCB2QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+OCo4PTY0PC9QPjwv
VEQ+DQogICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD45Kjg9NzI8L1A+PC9U
RD48L1RSPg0KICA8VFI+DQogICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD4x
Kjk9OTwvUD48L1REPg0KICAgIDxURCB2QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+Mio5
PTE4PC9QPjwvVEQ+DQogICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD4zKjk9
Mjc8L1A+PC9URD4NCiAgICA8VEQgdkFsaWduPXRvcCB3aWR0aD02MD4NCiAgICAgIDxQPjQqOT0z
NjwvUD48L1REPg0KICAgIDxURCB2QWxpZ249dG9wIHdpZHRoPTYwPg0KICAgICAgPFA+NSo5PTQ1
PC9QPjwvVEQ+DQogICAgPFREIHZBbGlnbj10b3Agd2lkdGg9NjA+DQogICAgICA8UD42Kjk9NTQ8