Aloittelija-ohjelmoija ei ehkä ole vielä tuttuyksi hyödyllinen silmukka. Tämä on tyypillinen syklinen toimenpide Pascal-ympäristössä. Sitä on kätevä käyttää useissa tehtävissä, joten analysoimme kuinka tämä jakso voidaan sisällyttää ohjelmaan.
While Pascal -jakso vaatii seuraavan muodon:
- Vaikka (ehto) tee (aloita tarvittaessa).
- Toimintaalgoritmi.
- Lopeta (jos on Käynnistä-komento).
Ensimmäinen rivi on komennon "otsikko".Ehto voi olla muuttujan kokonaisluku numeerinen raja-arvo (d <100), boolean-tyypin muuttujan arvo (t = tosi) tai merkkijono (tex = "hello"). "Aloita" -komento annetaan, jos useampi kuin yksi ehto tarvitaan silmukkarunkoon. Seuraava on kuvaus toimista, jotka ohjelman tulisi suorittaa, edellyttäen, että kun taas silmukka suorittaa. Se voi sisältää erilaisia komentoja, menettelyjä, toimintoja, samanlaisia jaksoja. Lopussa sinun täytyy laittaa komento "end", jos tietysti ensimmäisellä rivillä oli "aloita".
Теперь рассмотрим примеры программ, которые sisältävät kuvatun komennon. Meidän on esimerkiksi löydettävä ensimmäisten n positiivisen kokonaisluvun summa. Tätä varten oletamme alun perin n (olkoon sen aina suurempi kuin nolla). Sitten aloitamme jakson. On tärkeää ymmärtää, että sen on toimittava, kunnes se saavuttaa arvon n. Ongelman ratkaisemiseksi ei ole yhtä vaihtoehtoa, mutta keskitymme siihen, joka vaikuttaa laskurin käyttöön, joka on asennettava. Oletuksena tähän käytetään i-muuttujaa. Ennen kuin aloitat työskentelyn sen kanssa, sinun on annettava sille arvo "1". Laskuri toimii termina jokaiselle uudelle sykliselle toiminnolle. Tehtävämme perusteella meidän on jatkuvasti lisättävä yksi siihen. Siten laskurin numeerinen indikaattori on joskus yhtä suuri kuin luvun n arvo. Tämä on signaali ohjelman loppuun saattamiseksi. Summan laskemiseksi esitellään muuttuja k. Jokaisella uudella toistolla sille annetaan edellinen arvo plus luku i. Viimeisen laskelman jälkeen sinun pitäisi näyttää vain muuttuja k ruudulla. Tämä on lyhyt selitys ohjelmasta sanoin. Katso nyt ohjelmakoodia.
Readln (n); "- lue luku n.
i: = 1; k: = 0; "- laske laskuri käyttöön, nolla summan arvo.
Kun i <= n alkavat "- aseta silmukan ehto.
k: = k + i; i: = i + 1; "- lisää arvo kokonaismäärään, päivitä laskuri.
end; "- me täydentämme Some-kuvauksen.
Writeln (k); - tulostaa tiedot.
Tutustumme toiseen esimerkkiin.Nyt tarvitsemme näppäimistön käyttäjän täyttää n nimeä, jotka tekstimatriisi tallentaa. Periaate on tässä samanlainen kuin aiemmin. Syötä numero n, aktivoi Vaikka silmukka, aseta ehto. Seuraavaksi merkitsemme näppäimistön syöttämää taulukkosolun muistiin. Perustamme laskurin, suoritamme toistuvat toimenpiteet. Seuraavaksi nollaa laskuri ja näytä taulukko. Totta, laskurin nollaaminen tässä yhteydessä tarkoittaa sitä, että sille määritetään arvo yhdeksi, koska et voi näyttää taulukon nollasolua (sitä ei ole). Ohjelmakoodi on seuraava: Tästä ohjelmasta saat positiivisten kokonaislukujen sarjan summan, joka päättyy syötetyllä numerolla n. On ymmärrettävä, että ellei laskuria ole, vaikka Pascal-sykli ei lopu koskaan. Jos unohdat sen yhtäkkiä, tietokone alkaa jäätyä, kun ohjelmakoodi suoritetaan. Tätä käsitellään Pause Break -painikkeella. Käytämme muuttujaa c muutoksen laskurina.
Readln (n);
c: = 1;
Kun c <= n alkaa "- ehdon asettaminen.
Readln (a [c]); c: = c + 1; "- lue tiedot näppäimistöltä, lisää arvo laskuriin.
end; "- suoritamme syklin loppuun.
c: = 1; "- palauttaa laskenta alkuperäiseen arvoon.
Vaikka c <= n kirjoita (a [c]); "- näyttää n nimeä näytöllä.
Sen jälkeen näytölle tulee n nimeä, jotkasyötettiin näppäimistöltä. Tässä kohtaa päättyy Vaikka -silmukan johdanto. Sitä käyttävät sekä aloittelijat että kokeneet käyttäjät. Sillä ei ole laskuria, joten se vaatii ohjelmoijan erityisen huomion ja lisämuuttujan.