Qhov array hauv Pascal. Cov kev pabcuam rau arrays hauv Pascal

Txhua xyoo kev txaus siab rau qhov kev zov me nyuam nce. Thiab yog tias hauv lub koom haum uas sau ntawv tshwj xeeb rau hauv kev sau ntawv lawv ua tus thawj hauv lub programming xws li C ++, tom qab ntawd cov tsev kawm ntawv thiab cov tsev kawm ntawv kawm tau paub txog Pascal. Thiab twb nyob ntawm lub hauv paus ntawm hom lus pib nkag siab txog programming los ntawm kev siv Delphi software. Nws yuav tsum raug sau tseg tam sim ntawd hais tias cov lus programming no muab ib qhov chaw loj heev rau qhov kev tshwm sim ntawm lawv lub tswv yim. Thiab yog tias koj tuaj yeem siv hom lus "Pascal" kom koj tus kheej paub txog cov ntsiab lus ntawm qhov programming, ces rau Delphi koj tuaj yeem sau ib daim ntawv qhia tag nrho. Thiab qhov chaw tseem ceeb hauv kev sau ntawv kuj qee cov kev daws teeb meem ntawm Pascal.

Lub xub ntiag ntawm ib tug loj tus naj npawb ntawm heev txawv ntau yam

Nyob rau hauv hom lus programming, muaj ntau ntau ntau yam zog, uas tsuas yog ib qho tseem ceeb. Lawv muaj peev xwm muab cia rau hauv lawv tus kheej ib qho txiaj ntsig, muaj qee hom. Qhov kos yog cov hlua txoj hlua. Lawv yog cov tag nrho ntawm cov ntaub ntawv uas cov cim hom yog yam ntxwv. Tab sis xws li cov qhab nia feem ntau yog suav hais tias yog los ntawm kev sib tham ntawm ib tug neeg ntau npaum li cas.

Nws tsis yog pub leejtwg rau leej twg uas siv lub koos pis tis tau txo lub sijhawm los ua ib txoj haujlwm ua nrog ntau cov ntaub ntawv. Tab sis yuav ua li cas, thaum uas siv cov tsiaj ntawv no xwb uas paub txog hom neeg, koj tuaj yeem txuag tau lub ntsiab lus ntawm kev ua haujlwm, thiab tseem ua cov ntaub ntawv uas muaj cov kab ntau ntawm cov naj npawb? Kev ua haujlwm xws li tshwm sim ntau zaus hauv txhua qhov kev ua ub no.

Lawm, nws yog ib qho ua tau kom nkag mus rau hauv cov qhob zauv uas tsim nyog los ua kom tiav cov phiaj xwm. Koj tuaj yeem piav txog qee qhov tseem ceeb rau lawv. Tab sis cov cai ntawm qhov kev zov me nyuam yuav tsuas nce ntawm qhov no. Nws yog ib qhov nyuaj nyeem cov code, uas muaj ib tug loj tus naj npawb ntawm kab. Tshwj xeeb tshaj yog thaum koj xav tau kev tshawb nrhiav kom raug.

Raws li, cov neeg tsim kev soj ntsuam tau xav txog cov lus nug. Tias yog vim li cas hauv cov lus uas tau tsim rau lub sijhawm tam sim no, nws muaj xws li cov qhab-nees uas muab sijhawm rau kev khaws cov ntaub ntawv ntawm lawv tus kheej. Lub array hauv Pascal tau hloov ntau heev nyob rau hauv txoj kev mus rau lub cajmeem. Yog li ntawd, nws yog qhov tseem ceeb ntawm qhov kev qhia ua lus programming.

Siv cov arrays tau txo qhov nyiaj tsawg

Lub sij hawm no hides ib qho kev txiav txim ntawm cov ntaub ntawv uas ib hom yog yam ntxwv. Ntxiv rau, tag nrho cov ntaub ntawv no tau txais ib lub npe. Nws kuj tseem yuav tsum tau sau tseg tias nyob rau hauv lub ntsiab lus txhais ntau yam khoom ntawm lub ntiaj teb tiag tiag tuaj yeem ua tau: dictionaries, cartoons thiab ntau lwm yam. Txawm li cas los xij, cov lus qhia yooj yim tshaj plaws hauv "Pascal" yog muaj nyob hauv daim ntawv ntawm ib lub rooj. Nyob rau hauv txhua lub xov tooj ntawm tes yog ib qhov txawv txav. Nrog kev pabcuam ntawm cov haujlwm, koj tuaj yeem txiav txim xyuas txoj haujlwm ntawm qhov txawv txav uas nws yuav nyob rau hauv rooj sib thooj.

Dab tsi yog qhov ib-dimensional array?

Lub simplest yog lub rooj, uas yog linear. Hauv no array, thiaj li yuav txiav txim xyuas qhov chaw ntawm qhov parameter, nws yog txaus los qhia tsuas yog ib tus naj npawb. Ntau txheej arrays raug tsim ntawm lawv lub hauv paus.

Txhawm rau piav qhia txog cov duab nyob hauv Pascal, cia li ntaus cov cai nram qab no: Hom Array [] ntawm .

Raws li cov lej yog cov haujlwm uas muaj peev xwm muaj hom kab lus. Qhia txog qhov ntau, nws yog ib qho tseem ceeb kom to taub tias lub noob tsis tau siab tshaj qhov kawg. Cov hom uas lub ntsiab ntawm ib qho array muaj, yuav ua tau txhua yam - xws li tus qauv, los yog tau piav ua ntej. Qhov kev xaiv yuav nyob ntawm qhov xav tau los daws cov teeb meem.

Tus txheej txheem linear piav qhia li cas?

Nws yog peev xwm mus piav qhia tam sim ntawd ib zaug hauv Pascal. Qhov no yuav tsum tau ua hauv ib seem tshwj xeeb, uas yog tsim nyog rau txoj kev ua no. Koj yuav tsum sau cov cai nram qab no: Muaj : Array [] Ntawm .

Yuav kom nkag siab txog yuav ua li cas piav qhia txog ib qho array hauv Pascal, koj yuav tsum sau cov cai nram qab no:

- Muaj

- S, VV: Array [5..50] Ntawm Kev Tiag;

- K: Array ['C' .. 'R'] Ntawm Integer;

- Z: Array [-10..10] Ntawm Lo Lus;

- E: Array [3..30] Ntawm Kev.

Hauv qhov ua piv txwv no, cov qhab nia S, VV thiab T yog ib qho ntawm cov zauv uas muaj tiag. Hauv qab K kuj, tus cwj pwm hom thiab cov ntsiab lus muab zais. Uas muaj feem xyuam rau cov zauv. Cov khoom zauv array Z yog leej twg yog Lo Lus.

Ntawm tag nrho cov yeeb yam uas koj siv tau thaum ua haujlwm nrog ib qho array, koj tuaj yeem xaiv qhov haujlwm. Nws tuaj yeem raug rau tag nrho lub rooj. Piv txwv, S: = VV. Tab sis nws yog ib qho tseem ceeb kom to taub tias cov haujlwm ua haujlwm tsuas yog raug rau qhov teeb meem hauv Pascal, uas muaj qee hom.

Tsis muaj kev khiav haujlwm ntxiv uas tuaj yeem tshwm sim rau tag nrho cov array. Txawm li cas los, koj yuav tau ua hauj lwm nrog lub ntsiab nyob rau hauv tib lub ntsiab cai li lwm prime xov tooj muaj ib tug tej hom. Hauv kev nkag mus rau ib qho txawv parameter, koj yuav tsum qhia lub npe ntawm cov array. Los ntawm kev siv ntawm square nkhaus yog tsim nyog los txiav txim seb lub Performance index, uas yog cov yam ntxwv ntawm yam khoom. Piv txwv li: K [12].

Lub ntsiab sib txawv ntawm arrays thiab lwm cov qhob

Qhov sib txawv ntawm qhov sib txawv ntawm lub rooj thiab cov pauv yooj yooj yim yog tias nyob rau hauv quas nws yog ib qho ua tau kom tsis txhob tsuas yog tus nqi txheeb xyuas, tab sis kuj yog ib qho kev qhia uas tuaj yeem ua rau yam nqi. Ib qho piv txwv ntawm kev tsis tuaj yeem tuaj yeem ua raws li hauv qab no: V [K]. Tus K kuj kuj nce mus nce siab. Ntawm no nws ua raws li koj tau siv lub voj voog thaum sau, ua thiab luam tawm ib qho array.

Daim ntawv no ntawm lub koom haum tuaj yeem tshwm sim nyob rau hauv rooj plaub ntawm cov hlua cov hlua uas ncaj ncaj nyob hauv lawv cov khoom rau cov arrays ntawm hom Char. Tab sis muaj ntau qhov txawv. Lawv muaj raws li nram no:

1. Txoj hlua sib hloov tuaj yeem raug ntaus tawm ntawm cov keyboard thiab luam tawm ntawm qhov screen.
2. Cov hlua khov muaj kev txwv rau lawv qhov ntev. Koj tuaj yeem nkag mus rau ntau tshaj 255 cim. Qhov tseem ceeb ntawm cov array tseem ceeb yog 64 KB.

Los ntawm txoj kev twg koj tuaj yeem saib cov ntaub ntawv array ntawm qhov screen?

Lus ceeb toom yuav tsum tau them nyiaj rau cov txheej txheem ntawm cov array muaj nyob rau ntawm daim duab. Muaj ntau ntau.

1. Writeln (A [1], A [2], A [3]). Xws li ib qho piv txwv, txawm tias yog txheej thaum ub, nws muaj peev xwm qhia tau tias ib tus neeg tuaj yeem ncaj nraim mus rau txhua tus tib neeg lub hauv paus hauv lub rooj. Txawm li cas los xij, qee qhov zoo ntawm cov Pascal arrays muaj ntau yam yooj yim zog tsis pom ntawm no.
2. Qhov kev pab cuam A1;
   Muaj B: Array [1.10] Ntawm Integer;
   K: Integer;
   Pib
   Rau K: = 1 Mus 10 Ua {Qhov no command kom ib lub voj nrog cov parameter}
   Readln (A [K]); {A [Kuv] yog tawm tswv yim los ntawm kev siv cov keyboard}
   Rau K: = 10 Downto 1 Ua {Cov rooj ntawv luam tawm hauv nraub qaum txiav txim}
   Sau ntawv (A [K], 'VVV')
   Xaus.

Ib qho kev cai zoo li kev cai rau cov duab nyob hauv Pascal qhia tau hais tias koj tuaj yeem sau 10 tus lej uas siv cov keyboard, luam tawm lawv tawm, rov qab hloov qhov tseem ceeb nyob rau hauv qhov kev txiav txim rov qab. Yog hais tias qhov kev pab tib yam rov sau dua siv ntau tus tsiaj ntawv tsis muaj ib qho array, ces cov cai yuav raug nce ntxiv. Thiab qhov no tseem ceeb heev rau txoj kev nyeem cov txheej txheem.

Muaj peev xwm ntau dua los ntawm kev siv cov arrays

Koj tuaj yeem sau cov ntxhuav nrog cov kev ntseeg uas muaj sib npaug zos rau cov xwm txheej hauv qab. Kuj tseem muaj peev xwm los tsim ib qho array ntawm cov kab hauv Pascal, uas yuav tso tag nrho cov lej nkag mus cia. Raws li koj tau pom, siv cov array loj heev ua rau lub peev xwm ntawm Pascal lub programming lus.

Ua cov txheej txheem linear ntau heev nyob rau hauv ntau yam hauj lwm. Yog li, tsis muaj dab tsi txawv txawv nyob hauv qhov tseeb tias lawv tau kawm hauv cov tsev kawm ntawv thiab cov tsev kawm ntawv. Tsis tas li ntawd, tej zaum cov uas muaj nuj nqis nyob rau hauv lawv tus kheej yog qhov tseem ceeb heev.

Dab tsi yog muab zais rau hauv cov duab ob sab?

Koj tuaj yeem xav txog lub rooj uas muaj ob peb kab ib zaug. Txhua kab muaj ntau lub hlwb. Nyob rau hauv xws li ib qho teeb meem, thiaj li txiav txim siab rau txoj hauj lwm ntawm lub hlwb, nws yog ib qhov tsim nyog yuav tsum nco ntsoov tsis yog ib qho Performance index, raws li yog qhov teeb meem nrog linear arrays, tab sis ob - tus lej uas yog yam ntxwv rau kab thiab sab. Tus sawv cev zoo ib yam yog cov ntawv ob sab ntawm Pascal.

Yuav ua li cas los ua ib qho kev piav qhia ntawm cov ntxhuav ntawm hom no?

Cov qauv ntaub ntawv uas tshwm sim nyob hauv Pascal thiaj li yuav khaws tau qhov tseem ceeb ntawm lub rooj sib tham no yog hu ua ob lub qhov rooj. Ib qho kev piav qhia ntawm qhov kev lag luam no yog ua tau thaum siv ob txoj kev.

1. Muaj B: Array [1..15] Ntawm Array [1.30] Ntawm Integer;
2. Muaj B: Array [1..15, 1..30] Ntawm Integer.

Nyob rau hauv tag nrho cov no, ib qho ob-dimensional yog piav qhia uas muaj 15 kab thiab 30 kab. Cov lus piav qhia uas tau muab los saum no zoo kiag li. Yuav pib ua hauj lwm nrog ib qho ntawm cov ntsiab lus, koj yuav tsum xaiv ob qhov indexes. Piv txwv, A [6] [5] lossis A [6,5].

Qhov tso zis rau qhov kev tshuaj ntsuam yuav luag tib yam xws li hauv cov xwm txheej ntawm cov duab ib sab. Koj tsuas yog yuav tsum qhia ob qhov indexes. Hauv lwm txoj haukev, tsis muaj qhov txawv li no, yog li ntawd, nws tsis tas yuav tham txog qhov no ntev heev.

Thawj txoj hau kev uas koj tuaj yeem xaiv tau

Qee lub sij hawm yuav tsum txhawm rau txheeb cov ntaub ntawv. Ua li no, cov lus muaj cov lus sam hwm uas tsim nyog. Nws muaj ob lub tswv yim los ntawm qhov uas cov array thiaj yuav muab txheeb tau hauv Pascal. Lub ntsiab lus ntawm txoj kev xaiv ncaj nraim yog nyob hauv qhov tseeb uas los ntawm kev zes ua voj voog, txhua qhov sib txawv ntawm cov lus sib piv yuav muab piv nrog lwm qhov tseem ceeb. Hauv ua ke, yog tias muaj ib qho ntawm cov zauv 15, ces thawj tus naj npawb yuav mus raws tus txheej txheem sib piv nrog lwm tus lej. Qhov no yuav tshwm sim mus txog rau lub sijhawm, piv txwv li, lub keeb uas muaj ntau dua thawj zaug. Tom qab, daim duab no yuav muab piv rau. Qhov no yuav rov qab ua kom txog thaum lub sij hawm thaum lub caij loj tshaj plaws. Hom no yog qhov yooj yim heev rau cov neeg tsim kev kawm uas tau pib ua haujlwm ua hom lus.

Qhov thib ob hom ntawm kev faib cov arrays

Txoj kev thib ob yog npuas. Tus essence ntawm cov txheej txheem no lies nyob hauv qhov tseeb tias cov ntsiab lus nyob sib ze uas muab piv rau ob leeg. Piv txwv li, 1 thiab 2, 2 thiab 3, 3 thiab 4, thiab ntxiv rau. Yog tias tus nqi pom muaj raws nraim nrog cov kev sib txawv sorting, nws yuav raug tsiv mus rau qhov kawg ntawm tag nrho cov array, uas yog, nws pib raws li "npuas" . Qhov no algorithm yog qhov nyuaj tshaj kom nco ntsoov. Txawm li cas los, koj tsis tas yuav cim nws. Qhov loj tshaj plaws yog to taub tag nrho cov qauv ntawm cov cai. Thiab tsuas yog nyob rau hauv cov ntaub ntawv no, koj tuaj yeem thov kom ua tau zoo nyob rau hauv lub cajmeem.

Xaus

Peb cia siab tias koj nkag siab tias cov arrays yog dab tsi, thiab seb koj tuaj yeem xaiv los nrhiav tau tus nqi qiv los yog ua tiav ib lub hom phiaj. Yog tias koj raug xaiv los daws ib qho hauj lwm tshwj xeeb, "Pascal", cov arrays uas nyob rau hauv ib qhov chaw tseem ceeb, ces lawv yuav tsum ua kom zoo. Qhov no cuam tshuam los ntawm qhov muaj xws li cov kev kuaj pom hauv cov lus ntawm ib qho loj ntawm cov tsiaj ntawv uas siv rau hauv qee lub sijhawm los piv rau tag nrho cov cai raws li tag nrho. Arrays yog zoo raws li lub ntsiab lus tseem ceeb, qhov kev kawm uas yuav tsum tshwm sim yam tsis muaj xeem.