Turbo Pascal. Ha a ntse a ... etsa jwalo - sekgoqetsane ka precondition ka

Turbo Pascal, Leha ho le joalo hase ea lefatše ho ea ratang kopo ya mananeo, empa bakeli, e etsa hore mehato ea bona ea pele ea ho ngola ea software e le, qala ho tloaelana bona le mahareng ena. Ho fana e le maikutlo a ea ramifications, lisebelisoa, mesebetsi, le mekgwa, hammoho le lintho tse ling tse ngata. Mohlala, lipotolohong sefahleho ithuta a thulaganyo ka turbo Pascal: Ha, bakeng sa le ho Pheta.

Khopolo ea potoloho le variants lona

Potoloho A ke bohato repetitive. Tikolohong ena, sebelisa:

• le paramethara (Ka ... to ... etsa jwalo);
• le precondition (Ha ... etsa jwalo);
• e postcondition (Pheta ... fihlela).

The mofuta pele e sebediswa ha e se e tsejoa mehato bakae ho rarolla bothata. Leha ho le joalo, ho na le palo ya mesebetsi, moo ho se nang boitsebiso bo mabapi le kamoo ka makhetlo a mangata e tla a pheta kapa ketso eo. Tabeng ena, Pascal Ha potoloho fetoha bohlokoa haholo, tse kang, molao-motheo, 'me Pheta.

Sebōpeho sa potoloho ea

ke eng motheo oa mosebetsi ka Pascal Ha, Ka le Pheta lipotolohong? Ka meaho joalo abelwang karolo ya e platform le 'mele. The karolo ea pele ea divariabole e boletsweng hore o tla "mosebetsi" ba boletse ka ho hlaka ke maemo a ka nako ya tshebetso ya ho eo 'mele o tla bolaoa. Ka karolo ea bobeli ea lipolelo tse laetsoeng ho sebelisoa tabeng ea boemo ba, ke hore,. E. Ke 'nete hore e, ho ena le ba Bohata The.

Ha iteration o etsoa ka mola ho qetela ea code, ka nako eo ho khutlela ho platform, moo boemo ba e lekoa. Haeba tshebetso 'nete ba pheta,' me ka ketsahalo ea boemo boo leha e le efe ea lenaneo la "Tsoa" ho tloha potoloho 'me o etsa tshebetso ka ho eketsehileng.

Latela ponahalo Ha sekgoqetsane. Pascal ABC le mananeo a joalo a hloka ngola khoutu joalo:

• Ha a ntse a boemo etsa;
• qala;
• The sekgoqetsane 'mele;
• End.

Ka ketsahalo eo sekgoqetsane tla phethile 1 opareitara e (1 bohato), joale e ntan'o ba "ka masakaneng» qala ... qetellong ka lea ka la boleloa.

potoloho papetlakaelo

The turbo Pascal Ha likarolo tse latelang:

• ka hare sebopeho sa e ka ba thata ho sebelisa maemo;
• ka mor'a lentsoe la etsa ha aa lokela ho ba le phelelwana (ho nkoa le kokoanyana ka turbo Pascal le Pascal ABC);
• polygonal, kamehla kapa ho hlahisa maikutlo e sebeletsang ha karabo Bohata khumo bona subroutines lokela hakaalo ho utloahalang mofuta, ke hore,. e. Boolean.

Ho e tjena le literata temperaturdiagramm la a sa tsoaneng a potoloho. Ho bontša tatelano tsa liketso tsa ho kenya tshebetsong.

The-tharabololo ea potoloho ea

.. Ka bonolo libakeng mananeo, limithara le H ka Pascal ABC, Ha a ntse a sekgoqetsane sebetsang ka molao-motheo e latelang:

• .. Fuoa iteration, ke hore,, ho pheta-pheta, e ke e etsahale e le ka makhetlo a mangata ka nako e telele e le boemo ba 'nete (Ke' nete hore);
• hang ha boemo ba e sa kgotsofala le fana ka karabo ka Bohata (kapa ho seng joalo "Bohata"), le opareitara e tsoa sekgoqetsane;
• e le hang ha ho ileng sa etsahala, lenaneo lena le ile "a tsoela" ka moralo hlaha ka mor'a potoloho.

Ena ke phapang e bohlokoa ho tloha Ha Pheta, 't. E. A ea pele ho potoloho ho tloha postconditions ena.

Ho bohlokoa ho kenyeletsa ka sekgoqetsane lekanyelitsoeng phetoho ka fuoa polygonal platform Ha. Leha ho le joalo, ba lokela ho kile ua kena ka boemo bo ileng fana ho Bohata. Ho seng joalo ho tla ba le sekgoqetsane, ebe lokela ho nka mehato e eketsehileng ea ho Tsoa ho tloha mokelli ena. liphoso joalo li nkoa mekhoa e metle le ho se nang boikemelo.

Tsela ea ho Tsoa lenaneo ha Météo?

Boo hangata boemo boo ho etsahala ha opareita fana Ha Pascal sekgoqetsane ka ngotsweng lenaneo khoutu ya. See se bolela'ng? Iteration e pheta palo e ke keng ba lekanngoa ba linako tse ling, hobane boemo ba 'nete kamehla. Ka mohlala, sena khoutu sekhechana:

• Ha a ntse a 2> 1 etsa;
• Write (1).

Tabeng ena, ho mo kena hanong ka ho bolaoa ha mosebetsi, feela tobetsa Ctrl + F2.

Ho na le 2 litsela tsa ho laola boitšoaro ba lenaneo joalo. Ka mohlala, haeba a ngole Continue khoutu le fetelang taolo ho e le qalo ea mohaho cyclic (mona le sekgoqetsane tsoa boemo e leihlo, ke hore,. E phethahatsong ya iteration jwale e sitisoa). Ebe taolo e isoa ka Ha sekgoqetsane ka teko e fetileng.

Khefu opareitara e ka mo kena hanong ka ho bolaoa ha potoloho lohle 'me fetisetsa taolo ho iteration hlahlamang. Mona, le khumo ea kaho e ke ke ea laoloa. Setšoantšong bontša mehlala e ya tshebediso ya basebetsi tsena.

Pokano liphephetso

Nahana Ha sebetsa potoloho. Pascal proposes ho rarolla bothata boo ho fapane. A re ke re hlahlobeng e bonolo ho utloisisa opereishene. mesebetsi rarolloa ka lenaneo Pascal ABC. Empa tla tšohloa 'me setšoantšo sa classic tikoloho ya turbo Pascal bakeng sa papiso.

Mosebetsi 1: fuoa mosebetsi Y = 5-X ^ 2/2. Bopa tafole ea maemo a increments sh = 0.5 ho fetela ho karohano [-5, 5].

The-tharabololo ke:

• o ile a beha polygonal X e sa boleng ka lekhetlo la pele ba lekanang 5 (ke hore, e le qalo ea lekhalong ..);
• a bale le Y boleng, ha a x polygonal ha fihle qetellong ea re karohano;
• bontša melemo ea mosebetsi le abscissa (X);
• X keketseho e ke mohato esale pele.

Mona ke khoutu lenaneong Pascal ABC.

Joang khoutu lenaneong turbo Pascal. setšoantšo tlase e bontša sena.

Mosebetsi 2: fuoa drive A e entsoeng ka le linomoro kaofela ntle 'me negative. E na le lintho tse 10. Tlhokeho ya ho theha e popeho eo likarolo tse ntle tse ngata A di behilwe nang le esita le li-index. Behantsha Balang ya dikwere ho ea palo ea lenaane-thalo le lecha.

The-tharabololo ke:

• O lokela ho ngola le kemiso eo e tla "mosebetsi" feela le thepa ea motheo ha drive A nang le esita le li-index. Ka sekgoqetsane boleng polygonal ngollana ho parity tsa li-index li tla incremented ke tse peli.
• Ha palo ea ke esita le li-index, ho tloha popeho ya A tšoana le boemo: x> 0, ea stats drive e incremented ke 1. The boleng jwale ya sebadi polygonal tla index ya nomoro kopi ka drive B.
• Qalong, summa polygonal, ke eena ea ikarabellang bakeng sa ho fumana chelete eo ea mapatlelong a inthenja ntle, e behiloeng ka ho 0. Joale, ke buuoe tla etsoa: ho Balang fetileng e eketsa boleng e ntjha ya lisekoere e.
• U se ke ua tšaba, haeba e se linomoro tsohle positive, ba ile ba fallela ho tloha drive mong ho e 'ngoe. U lokela ho ba hlokolosi. Tse ngata ba mananeo novice ho ngwaloleswa le khoutu a tšohile ka. Hoa hlokahala ho ka hloko hlahloba boemo: linomoro tse ntle tseo ba ka esita le "ea moo", ke hore,, le indices tse dipalokatisanetswa 2 ...

Manual kgatisong e hlokahala e le hore ho etsa bonnete ba hore le manolotsoeng ea botšepehi. Ka linako tse ling, ho sebelisa mokhoa ona ka ho hlwaya liphoso tse sa tšoase leihlo tlas'a tlhahlobo tloaelehileng ea khoutu e ngotsoeng.

Haeba re phetha dipalelo pukwanana, ho ka etsahala ho etsa bonnete ba hore lenaneo le sebetsa hantle. Sena, le eena, o ile a re khoutu isa molokong o mong-tharabololo e nepahetse, a latellana joang tsa liketso tsa isang qetellong utloahalang.