pascal第06讲 输入（读）read 语句.mht

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

From: <由 Microsoft Internet Explorer 5 保存>
Subject: =?gb2312?B?ufPW3cqhza3IyrXa0rvW0NGn?=
Date: Fri, 30 Nov 2007 11:53:00 +0800
MIME-Version: 1.0
Content-Type: text/html;
	charset="gb2312"
Content-Transfer-Encoding: base64
Content-Location: http://www.tryz.com.cn/yz/PRINTLR.ASP?ID=5714
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.2180

PCFET0NUWVBFIEhUTUwgUFVCTElDICItLy9XM0MvL0RURCBIVE1MIDQuMCBUcmFuc2l0aW9uYWwv
L0VOIj4NCjxIVE1MPjxIRUFEPjxUSVRMRT6589bdyqHNrcjKtdrSu9bQ0ac8L1RJVExFPg0KPE1F
VEEgY29udGVudD0iTVNIVE1MIDYuMDAuMjkwMC4zMTU3IiBuYW1lPUdFTkVSQVRPUj4NCjxNRVRB
IGNvbnRlbnQ9RnJvbnRQYWdlLkVkaXRvci5Eb2N1bWVudCBuYW1lPVByb2dJZD4NCjxNRVRBIGh0
dHAtZXF1aXY9Q29udGVudC1UeXBlIGNvbnRlbnQ9InRleHQvaHRtbDsgY2hhcnNldD1nYjIzMTIi
PjwvSEVBRD4NCjxCT0RZPg0KPFRBQkxFIGhlaWdodD0yNCBjZWxsU3BhY2luZz0wIGNlbGxQYWRk
aW5nPTAgd2lkdGg9IjEwMCUiPg0KICA8VEJPRFk+DQogIDxUUj4NCiAgICA8VEQgYWxpZ249bWlk
ZGxlPjxGT05UIHN0eWxlPSJGT05ULVNJWkU6IDI0cHQiIA0KICAgICAgY29sb3I9IzAwMDAwMD5w
YXNjYWy12sH5vbI6yuTI66OotsGjqXJlYWQg0+++5CA8L0ZPTlQ+PC9URD48L1RSPjwvVEJPRFk+
PC9UQUJMRT48QlI+DQo8UCBhbGlnbj1jZW50ZXI+yuTI66OotsGjqXJlYWQmbmJzcDvT777kPC9Q
Pg0KPFAgYWxpZ249bGVmdD48QlI+obzT77eot9bO9qG9IA0KPEJSPjxCUj6hoaGhtsHT777ko6hy
ZWFk0+++5KOpus24s9a10+++5NK70fmjrMTcubu4xLHkseTBv7XE1rWho9PruLPWtdPvvuSyu82s
o6y2wdPvvuS007z8xcy78s7EvP6908rV1rW4s9PoseTBv6Ostvi4s9a10+++5NTy1rG909PJs8zQ
8tPvvuS78bXDoaO2wdPvvuS48cq9yOfPwqO6IA0KPEJSPqGhoaEmbmJzcDtyZWFkKLHkwb/D+7Ht
KaO7IDxCUj6hoaGhJm5ic3A7cmVhZGxuKLHkwb/D+7HtKaO7IDxCUj6hoaGhJm5ic3A7cmVhZGxu
o7sgDQo8QlI+oaGhoSZuYnNwO7bB0+++5MrHseCzzNbQ08O1w9futuC1xNPvvuTWrtK7oaPU2sq5
08PKsdPQvLi149Kq16LS4qO6IA0KPEJSPjxCUj6hoaGhJm5ic3A7MaGiseTBv8P7se2ho9C01NrA
qLrF1tC1xLHkwb+jrLa80qrU2rHkwb/LtcP31tDPyNSk0tTLtcP3o7ux5MG/0+ux5MG/1q685KOs
0tShsCyhsbfWuPSjuyA8QlI+wP2juiANCjxCUj52YXImbmJzcDthLGI6aW50ZWdlcjsgPEJSPnJl
YWQoYSxiKTsgDQo8QlI+PEJSPqGhoaEmbmJzcDsyoaK007z8xcy908rVyv2+3cqxo6zSqtei0uK4
99bWsrvNrMr9vt3A4NDNyv2+3bXEt9a49Lf7srvNrKGjy/nOvbfWuPS3+77NysfBvbj2zerV+7XE
yv3WtdauvOS1xLHqvMejrNKyv8nS1NXi0fnA7b3io6y1sbzGy+O7+rTTvPzFzLbByOvK/b7dyrGj
rNK7tanF9rW9t9a49Lf7o6y+zcjPzqq1scewtcTK/b7dtsHI69LRzeqzyaOsv8nS1LDRy/y4s7j4
z+DTprXEseTBv8HLoaO499bWyv2+3cDg0M21xLfWuPS3+8jnz8KjuiANCjxCUj6hoaGhJm5ic3A7
yv3WtdDNo6iw/MCo1fvQzaGiyrXQzdLUvLDL/MPHtcTX073nwODQzaOp0tS/1bjxu/K72LO1t/vX
986qt9a49Lf7o7sgDQo8QlI+oaGhoSZuYnNwO9fWt/vQzbK70Oi31rj0t/ujqNLyzqrX1rf70M3K
/b7dtcSzpLbIucy2qKOs1rvT0NK7uPajqaO7IDxCUj6hoaGhJm5ic3A719a3+7Su0tS72LO1t/vX
986qt9a49Lf7oaMgDQo8QlI+PEJSPqGhoaEmbmJzcDszoaLXotLicmVhZNPrcmVhZGxutcTH+LHw
IA0KPEJSPqGhoaG82cnoUkVBRLvyUkVBRExO0qrH88rkyOtYuPbK/b7do6y2+M7Sw8fK5MjryrHS
ssrkyOvBy1i49sr9vt2jrNXiyrFSRUFE0+tSRUFETE61xLmmxNzKx83qyKvSu9H5tcShoyANCjxC
Uj6hoaGhJm5ic3A7tavKx6OsyOe5+9Kqx/PK5MjrWLj2yv2+3aOstvjO0sPHyuTI68HLtuDT2li4
9sr9vt3KsaOoyOdYK0649qOpo6zV4sqxUkVBRNPrUkVBRExOtrzKx7DRx7BYuPbK/b7duLO4+Fi4
9rHkwb+jrLb4yqPPwrXEtuDK5MjrtcROuPbK/b7dvs3T0Mjnz8LH6b/2o7rI57n7ysdSRUFEo6zU
8tXiTrj2yv2+3bG7saO05s/CwLSjrLW9z8LSu7j2UkVBRC9SRUFETE7T777kyrHU2bizuPjKo8/C
tcSx5MG/o7u2+NPDtcTKx1JFQURMTrXEu7CjrNXi0KnK/b7dvauxu7fFxvqjrLK7u+HB9NbBz8LS
u7j2UkVBRC9SRUFETE6hoyZuYnNwOyANCjxCUj6hoaGhJm5ic3A7wP2jutPQwb22zrPM0PLT0M/g
zay1xLHkwb/LtcP3yOfPwqOssrvNrLXEtsHT777ko6zO0sPHv8nS1M2ouf2xyL3Py/zDx9a00NC9
4bn7tcTS7M2swLTA7b3icmVhZNPrcmVhZGxutcTH+LHwoaMgDQo8QlI+PEJSPrHkwb/LtcP3Jm5i
c3A7dmFyJm5ic3A7YSxiLGMsZDppbnRlZ2Vyo7smbmJzcDsmbmJzcDvWtNDQveG5+yZuYnNwOyAN
CjxCUj5hJm5ic3A7YiZuYnNwO2MmbmJzcDtkJm5ic3A7IDxCUj7K5Mjryv2+3SZuYnNwOzEmbmJz
cDsyJm5ic3A7MyZuYnNwOzQmbmJzcDs1IA0KPEJSPjYmbmJzcDs3Jm5ic3A7OCZuYnNwOyZuYnNw
OyZuYnNwOyZuYnNwOyZuYnNwOyZuYnNwOyZuYnNwOyZuYnNwOyZuYnNwOyZuYnNwOyANCjxCUj6z
zNDyts7SuyZuYnNwO3JlYWQoYSk7IDxCUj5yZWFkbG4oYixjKTsgPEJSPnJlYWQoZCk7IA0KPEJS
PiZuYnNwOzEmbmJzcDsyJm5ic3A7MyZuYnNwOzYmbmJzcDsgPEJSPrPM0PK2zrb+Jm5ic3A7cmVh
ZGxuKGEpOyA8QlI+cmVhZChiLGMpOyANCjxCUj5yZWFkKGQpJm5ic3A7MSZuYnNwOzYmbmJzcDs3
Jm5ic3A7OCZuYnNwOyA8QlI+oaGhoSZuYnNwOyANCjxCUj6hoaGh1NqzzNDyts7Su9a00NDKsaOs
obByZWFkKGEpO6Gx0+++5L3TytXBy7Xa0ru49sr9vt0xsqK9q8v8uLO4+LHkwb9ho7u909fF1rTQ
0LXatv649tPvvuShsHJlYWRsbihiLGMpO6Gxo6y908rVwcu12tK70NDK/b7d1tC1xDKhojOyorDR
y/zDx7fWsfC4s7j4seTBv2IsY6OszazKsaOssNGxvtDQxuTL/Mr9vt3Iq7K/xsGxzrX0o6zSsr7N
ysfQ+7K8y/zDx8irsr/X97fPoaOzzNDyts62/rXE1rTQ0Mfpv/bSssrHyOe0y6GjIA0KPEJSPqGh
oaEmbmJzcDvS8rTLo6zO0sPHv8nS1LXDs/a94cLbo7rT777kcmVhZNa7udy908rVyv2+3aOs0+++
5HJlYWRsbr3TytXN6sr9vt2686Osu7mw0c2s0NC1xMbky/zK/b7dyKuyv9D7srzX97fPoaMmbmJz
cDsgDQo8QlI+PEJSPqGhoaE0oaKhsHJlYWRsbjuhsdPvvuS007z8xcy908rV0ru49rvYs7W3+6Gj
1eK49tPvvuTNqLOj08PU2tDo0qrU3c2jtcS12Le9oaPI58rks/bKsdPDwLS1yLT9s8zQ8tSxv7TH
5b3hufuhoyZuYnNwOyANCjxCUj48QlI+19y94aO6IDxCUj48QlI+seTBv8Dg0M3T68rkyOu1xMr9
vt3A4NDNsdjQ69K71sKhoyZuYnNwOyA8QlI+yuTI68uz0PLT67Hkwb/Ls9Dy0qrSu9bCoaMmbmJz
cDsgDQo8QlI+16LS4sr9vt249sr90+ux5MG/uPbK/bXEudjPtaGjIDxCUj48QlI+PC9QPjwvQk9E
WT48L0hUTUw+DQo=