Hlua neeg teb xov tooj nyob rau hauv Pascal - txoj hlua

Programming yog lossi kev cob cog rua nrog lub chaw ua hauj lwm nrog ib co ntaub ntawv, xws li cov hlua. Hlua neeg teb xov tooj yog txhais tib txoj kev nyob rau hauv feem ntau hom lus, xws li Pascal: txoj hlua. Tab sis Pascal nws muaj nws tus yam ntxwv thiab cov khoom uas koj yuav tsum paub ua ntej koj pib.

Yuav ua li cas yog ib txoj hlua nyob rau hauv Pascal?

Ua ntej peb yuav nrog lub syntax ntawm ib txoj hlua ntaub ntawv yam nyob rau hauv Pascal, nws yuav tsum tau to taub hais tias cov hlua yuav ua tau. Nyob rau hauv qhov tseeb, nyob rau hauv Pascal hlua - ib tug array ntawm cov cim, txhua tus uas yuav ua tau tej lub caij uas lub ASCII-rooj. Hais tias yog, tej tsab ntawv, xov tooj, cov cim cim los yog qhov chaw yuav siv tau raws li ib tug txhob.

Qhov siab tshaj plaws pes tsawg tus ntawm cov cim nyob rau hauv ib tug kab yog 255 units, thiab txhua tus ntawm lawv tau txais lub sib nug xov serial tooj. Yog li ntawd, yog tias koj yuav tsum tau sau ib tug loj ntawv nyob rau hauv ib tug nce mus nce los, koj yuav tsum tsim ib qho kev array ntawm txoj hlua. Pascal kom cov txheej txheem rau cov kev thov, thiab koj yuav tseg muaj nuj nqis lawm text ntaub ntawv.

Txoj hlua ntaub ntawv hom

Nyob rau kab yog lub luag hauj lwm ntawm hom hlua. Pascal tso cai rau lub programmer qhia kom meej rau lub caij nyoog tooj ntawm cov cim los yog tawm nws nyob lub neej ntawd ntev - nyob rau hauv cov ntaub ntawv no, nws yuav ua ncaj rau 255. Kom tshaj tawm ib txoj hlua nce mus nce los, sau tib yam lus, yuav tsum tau ua raws li los ntawm ib tug nyuv qhia kom meej rau ib tug lo lus tseem ceeb -: txoj hlua thiab, yog tias tsim nyog, nyob rau hauv square nkhaus sau npe ntev kab. Cov piv txwv hauv qab no yog muab los ntawm cov hlua "str", 10 cim ntev:

var str: txoj hlua [10].

Lub Pascal txoj hlua tus code ntawm cov kev pab cuam yuav tsum tau muab teem tej nqi - nws yog tsuas tsim nyog los vij nws nyob rau hauv ib quotes.

txoj hlua haujlwm

Nyob rau cov lus, thiab yog txiav txim los ntawm tus xov tooj ntawm muas, uas yuav khiav cov hlua. Pascal tso cai rau kev sib piv thiab cov phiajcim txoj hlua ntaub ntawv.

hauj lwm ua ke lag luam (nyob rau hauv lwm yam lus ib concatenation los yog clutch) yog ua mus ua ke ntau kab mus rau hauv ib tug. Nws yog siv los ntawm kev ntxiv lub kos npe rau "+". Nws yuav siv tau los tsim ib tug ib kab muaj ib tug series ntawm kab zauv, constants thiab zog.

Nws yuav tsum tau muab sau tseg hais tias los ntawm combining cov lus nyob rau hauv kab lus los ntawm concatenating kab kis ntawm txhua lub caij yuav tau rho. Yog li ntawd, xav tau ib tug zoo-Ua qauv yuav tsum tau nyob rau hauv txoj cai qhov chaw kom meej meej qhia hauv lub xub ntiag ntawm cov kis los ntawm kev ntxiv ib qhov chaw cim, xws li: "."

Lwm lag luam podderzhvaet nyob rau hauv Pascal, - txoj hlua piv los yog kev sib piv ntawm cov hlua. Rau nws kuj siv ib tug yooj yim xaam tej yam tshwm sim:

• koob pheej ntawm lawv (=);
• Nyob / Nyob rau hauv (> thiab <);
• Sib xws (<>);
• thiab ntau dua los yog sib npaug zos rau thiab tsawg dua los sis sib npaug zos rau (> = thiab <=).

Cov tshwm sim ntawm cov paub tswv yuav rov qab mus ib Boolean nqi ntawm yeej muaj tseeb los yog cuav.

Piv yog ua cim los ntawm cov ua cim cov hlua, thiab thaum twg cov thawj tshwm sim ntawm inconsistencies yog txiav txim raws li lub encoding rooj. Yog li ntawd, thaum koj khom lub tsheb tawm uas yog ib tug ntau dua, lub chaw nyob qhov twg yuav ua tau txawv cim uas yuav sib piv cov cai nyob rau hauv lub rooj, thiab cov kev tshwm sim ntawm nws, thiab yuav tsum tau txiav txim los ntawm ib tug teb hais tias lub lag luam rov qab.

Muaj nuj nqi nrog txoj hlua ntau yam

Raws li cov kev programming lus, Pascal muaj ib tug xov tooj ntawm kev khiav dej num uas cov hlua yuav siv tau. Pascal tso cai rau koj mus luam tau ib feem ntawm ib tug nce mus nce los, mus ua ke ntau cov hlua mus rau txhua lwm yam, mus nrhiav ib tug substring, thiab xam nws kav ntev npaum. Qhov no yog ua li cas siv cov nram qab 4 zog:

• Rau kev luam ntawm cov kab sau raws nkaus Ii Copy muaj nuj nqi. Nws muaj peb tsis - ib txoj hlua los yog nce mus nce los lub npe, pib txoj hauj lwm thiab tus naj npawb ntawm cov cim hais tias koj xav kom luam:

Daim (S, poz, n) - yog S - txoj hlua nce mus nce los, thiab poz thiab n - ib tug zauv.

• Nyob rau hauv tas li ntawd mus rau ib tug hlua concatenation, siv lub cim "+", yuav ua rau lub lag luam ntau txoj kev yooj yim los ntawm kev siv Concat muaj nuj nqi. Raws li nws cov nqe lus uas siv tag nrho cov kab thiab leb kab zauv uas yuav tsum tau ua ke:

Concat (s1, s2 ...).

• Feem ntau siv nyob rau hauv Pascal nuj nqi yog Length. Koj muaj peev xwm siv nws los xam qhov ntev ntawm txoj hlua - hais tias yog, paub cov xov tooj ntawm cov cim nyob rau hauv nws. Lub tsuas sib cav rau qhov no yog txoj hlua nws tus kheej - cov zis cov neeg siv yuav tau txais ib integer nqi:

Length (str).

• Thiab qhov kawg ntawm lub zog nyob rau hauv Pascal yog mus nrhiav rau thaum pib ntawm lub substring - Pos. Nws rov tus xov tooj ntawm cov cim ntawm uas pib yuav tsum tau substring, thiab nyob rau hauv cov ntaub ntawv ntawm nws qhaj ntawv, yog lub txiaj ntsim ntawm tus 0:

Pos (Whyteshadows, S).

Kev kho kab nyob rau hauv Pascal

Standard cov txheej txheem siv nyob rau hauv Pascal, tsuas yog ob tug. Tus thawj tso cai rau koj mus tshem tawm ib tug tej yam substring, thiab lub thib ob - mus ntxig rau hauv ib tug series txoj hlua.

Yog li, rho tawm txoj kev deletes xaiv kab, nrog hais tias txoj hauj lwm ntawm ib tug substring ntawm ib tug tej yam muaj pes tsawg tus ntawm cov cim. Txhua yam ntawm cov tsis yog qhov sib cav ntawm lub lag luam:

Rho tawm (S, poz, n) .

Thiab ntxig ib theem zuj zus ntawm cov cim nyob rau hauv ib txoj hlua, koj muaj peev xwm siv Insert. Tus txheej txheem muaj lub luag hauj lwm ntawm lub peb tsis - lub substring, cov hlua thiab txoj hauj lwm uas los ntawm tus insert yog ua los ntawm cov cim:

Ntxig (Whyteshadows, S, poz) .

Hloov cov hom ntawm cov ntaub ntawv kab

Thaum nqa tawm kev pab raws qib feem ntau yuav tau hloov lub hom tsiaj. Xav txog, piv txwv li, yuav ua li cas hloov ib txoj hlua rau integer. Pascal tsis pub ntxiv tus xov tooj sau nyob rau hauv ib tug kab, li ntawd, rau qhov nyiaj ua hauj lwm, lawv yuav tsum tau hloov lub hom. No muaj tshwj xeeb cov txheej txheem:

• Kom hloov ib txoj hlua rau ib tug integer nyob rau hauv Pascal yuav tau siv cov txheej txheem StrToInt. Cov uas ua integer nqi yuav sau raws li ib tug nce mus nce los, thiab ua zauv hauj lwm nrog nws.
• Yog hais tias tsim nyog los nrhiav tau ib tug floating taw tes los ntawm ib tug muab txoj hlua siv StrToFloat txoj kev. Raws li zoo raws li ib tug integer, lub txiaj ntsim ntawm nws cov kev siv yuav tsum siv tam sim ntawd.

• Yuav kom ua tau qhov rov qab lub lag luam - hloov ib tug xov tooj mus rau ib tug hlua - koj yuav tsum tau siv FloatToStr cov txheej txheem rau floating-point thiab integer qhov tseem ceeb rau IntToStr.
• Lwm txoj kev hloov hom yog cov siv ntawm tshwj xeeb cov txheej txheem, uas tsis yuav tsum tau paub pib los sis kawg cov ntaub ntawv hom, - Str thiab Val. Thawj ua txhais cov lus hauv xov tooj mus rau ib txoj hlua thiab muaj raws li ib tug sib cav ob qhov tseem ceeb - lub noob thiab tus nce mus nce los lub npe uake. Qhov thib ob ua qhov rov qab ua lag luam, thiab muaj ib tug parameter ntau - nyob rau hauv tas li ntawd mus rau lub numeric thiab txoj hlua qhov tseem ceeb nyob rau hauv cov txheej txheem muab code qhia rau koj qhov tseeb hloov dua siab tshiab. Piv txwv li, koj sim mus sau cov fractional xov tooj mus rau ib tug integer nce mus nce los, lub code yuav qhia tus xov tooj ntawm cov cim, nyob rau hauv uas muaj yog ib tug tsis ua hauj lwm, thiab thaum twg txoj cai transformation, nws cov nqi yog 0.