Kuigi silmus on kasulik programmeerijad

Algaja programmeerijad ei pruugi veel olla tuttav kasulik samas loop. See on tüüpiline tsükli operatsiooni Pascal keskmise. See on kasulik erinevate probleemide, et vaadata, kuidas saate teha programmi selles tsüklis.

Tsükkel Kuigi Pascal nõuab tehtud järgmiselt:

• Kuigi (tingimus) ei (alustada vajadusel).
• tegevuse algoritmi.
• End (kui meeskond hakkavad kättesaadavus).

Esimene rida - "cap" käsk. Tingimuseks võib olla arvväärtus piirates selgitavad muutujad Integer (d <100), muutuja tõeväärtust (t = True) või nööri (tex = 'tere'). "Alustada" käsk panna, kui silmus on vaja täita rohkem kui ühe tingimuse. Alljärgnevalt on kirjeldatud meetmed, et programm peab täitma tingimusel, et samas silmus täidetakse. See võib sisaldada mitmesuguseid käske, protseduurid, funktsioonid, nagu tsüklit. Lõpuks on vaja panna käsk "lõpuks", kui muidugi, esimene rida oli "algab".

Nüüd leiavad näiteks programme, mis sisaldavad kirjeldab käske. Näiteks peame leidma summa esimese n positiivsed täisarvud. Selleks, esialgu me peame n (kuigi see on alati suurem kui null). Seejärel alustatakse tsüklit. On oluline mõista, et ta peab tegema, kuni see jõuab n väärtus. Siin on rohkem kui üks võimalus probleemi lahendamiseks, kuid me keskenduma sellele, mis mõjutab kasutamise leti et soovite installida. Vaikimisi on see toimub kasutades muutuja i. Enne kui alustada on vaja määrata selle väärtus on "1". Leti toimib perspektiivis iga uue tsükliline meetmeid. Põhineb meie missioon, pidevalt on lisada üks ta. Seega, kui numbriline indeks counter võrdub arvu väärtuse n. See on signaal töö lõpetamist programmi. Et arvutada tutvustame muutuja k. Iga kordamine see määratakse eelmise väärtuse pluss number i. Pärast lõppu lugedes, üksnes järeldada k selgitavate muutujatena ekraanil. See on lühike selgitus sõnad programmi. Nüüd vaatame koodi.

Readln (n); "- loeme arvu n.

i: = 1; k: = 0; "- sõlmida töö loendur, me null välja väärtus summa.

Kuigi i <= n ei hakata "- luua tingimused töö vältel.

k: = k + i; i: = i + 1; "- lisaväärtust summa uuendatud counter.

lõpetamiseks; "- samas täites töö kirjeldus.

Writeln (k); - Need järeldused.

Ootame veel üks näide. Nüüd on vaja täita kasutajale klaviatuur n nimed, mis päästab tekst massiiv. Põhimõte siin on sarnane varem. Sisestage number n, me aktiveerida Kuigi silmus sisselülitatud olekus. Lisaks tähistavad klaviatuur sisend mälu raku massiiv. Määra loendur lõpetab korduvate toimingutega. Järgmine, nullitakse loendur ja ekraani massiiv. Kuid loenduri nullimist Selles kontekstis tähendab omistada väärtus ühe, sest sa ei saa tuua null raku array (seda ei ole olemas). Programm kood on järgmine: selles programmis saate summa mitmed looduslikud positiivse arvuga, mis lõpeb kehtestamine kõige n. Tuleb mõista, et puudumisel leti, Kuigi Pascal tsükli kunagi lõpeb. Kui te äkki unusta see, täitmisel programmi koodi, arvuti hakkab riputada. See on ravitud nupule "Peata Break". Selle leti kasutamiseks mitmekesisuse selgitavate muutujate c.

Readln (n);

c: = 1;

Kuigi c <= n ei hakata "- seadme tingimusi.

Readln (a [c]); c: = c + 1; "- loeb andmeid klaviatuur, lisame väärtust counter.

lõpetamiseks; "- täites tsükli.

c: = 1; "- schetiku tagasi algse väärtuse.

Kuigi c <= n do write (a [c]); "- Näita nime n.

Siis saad ekraanil n nimed, mis on klaviatuurilt sisestada. Tol, samal ajal loop lõpeb. Seda kasutatakse nii algajatele ja edasijõudnud kasutajatele. Ta ei loe, ning seetõttu nõuab erilist tähelepanu programmeerija ja täiendava muutuja.