Ciklikus algoritmus ict pascal példa. Előadás a számítástechnikában a "Ciklikus szerkezet algoritmusai" témában

Ciklikus algoritmus ict pascal példa.  Informatikai előadás a témában
Ciklikus algoritmus ict pascal példa. Előadás a számítástechnikában a "Ciklikus szerkezet algoritmusai" témában

2. dia

Terv

Loop-koncepció Loop-utasítás a Loop While Loop Repeat irodalomhoz

3. dia

Irodalom

Kastornov A.F., Evstratova G.A. Pascal programozási nyelv: oktatóanyag egyetemek számára. - Cserepovec: GOU VPO ChGU, 2010. - 117 p. - Bibliográfia: 114. o. Elektronikus tankönyv a Pascal programozási nyelvről / http://pascal.guti.ru Terv

4. dia

A ciklus fogalma

Számos probléma megoldására szolgáló algoritmus ciklikus, amelyben az eredmény elérése érdekében bizonyos sorrend a műveleteket többször hajtják végre. Például egy tudásellenőrző program kiad egy kérdést, elfogadja a választ, az összpontszámhoz hozzáad egy jelölést a válaszért, majd addig ismétli ezeket a lépéseket, amíg az alany meg nem válaszol minden kérdést. Vagy például a kívánt vezetéknév kereséséhez a listában ellenőrizze, hogy a lista első vezetékneve egyezik-e a kívánt vezetéknévvel, majd a második, harmadik stb. amíg meg nem találja a kívánt vezetéknevet vagy el nem éri a lista végét.

5. dia

Ciklikusnak nevezzük azt az algoritmust, amelyben van egy többször végrehajtott utasításcsoport. Az ismétlődő állítások csoportját huroktestnek nevezzük. Pascalban a ciklusok a For, a While és a Repeat ciklusutasításokkal valósíthatók meg. Terv

6. dia

A hurokutasításhoz

A For loop operátort akkor használjuk, ha a ciklus törzsét többször kell végrehajtani, és az ismétlések száma előre ismert.

7. dia

A For ciklus utasítás 1. formája

A For utasítás írásának 1. formája általánosságban a következő: ForCounter:=Kezdő_érték - End_value doOperator; Ahol For, to, do szolgálati szavak. A számláló egy sorszámú változó (általában egész szám), amely megadja, hogy a ciklus hányszor ismétlődik. Az ismétlések számát a következő képlet alapján számítjuk ki: End_value - Start_value + 1. a vég_értéknek nagyobbnak vagy egyenlőnek kell lennie, mint a kezdő_érték.

8. dia

Ha a ciklustörzs több utasításból áll, akkor a For utasítás 1. alakja a következőképpen néz ki: ForCounter: = Kezdő_érték - End_value do Begin (Curktörzs) End;

9. dia

Tekintsük a For ciklus algoritmusát az első írásmódban. A számlálóhoz egy kezdeti_érték van hozzárendelve. A feltétel ellenőrzésre kerül: A számláló értéke nagyobb, mint az End_value? Ha a feltétel igaz (Igen), a ciklus véget ér. Ha a feltétel false (Nem), akkor a ciklustörzs végrehajtásra kerül, majd a számláló értékét eggyel növeljük és a feltételt ismét ellenőrizzük, azaz. 2. tétel.

10. dia

A For ciklus utasítás 2. formája

A For utasítás írásának 2. formája általában így néz ki: For Counter:=Start_valuedownto End_valuedoOperator; Hol: Mert, downto, do szolgálati szavak. A számláló egy sorszámú változó (általában egész szám), amely megadja, hogy a ciklus hányszor ismétlődik. Az ismétlések számát a következő képlet alapján számítjuk ki: Kezdő_érték - Végérték + 1. A kezdő_értéknek nagyobbnak vagy egyenlőnek kell lennie, mint az End_value.

dia 11

Ha a ciklustörzs több utasításból áll, akkor a For utasítás 2. alakja így néz ki: ForCounter:=Start_value downto End_valuedo Begin //Loop body End;

12. dia

Tekintsük a For ciklus algoritmusát a jelölés második formájában: A számlálóhoz egy Kezdeti_érték van hozzárendelve. A feltétel ellenőrzése: A számláló értéke kisebb, mint az End_Value? Ha a feltétel igaz (Igen), a ciklus véget ér. Ha a feltétel false (Nem), akkor a ciklustörzs végrehajtásra kerül, majd a számláló értékét eggyel csökkentjük és a feltételt újra ellenőrizzük, azaz. 2. tétel.

dia 13

A hurokutasításhoz

programEx1; var i, n:integer; (i a számláló, n a szükséges csillagok száma) s:string;(s a generálandó csillagok sora) begin Writeln("Adja meg a csillagok számát"); (a csillagok számát kéri) Readln(n); (a felhasználó n csillagot ír be) s:=""; (a csillagokból álló karakterlánc képződése üres karakterlánccal kezdődik) (A karakterlánc a For ciklus szerint jön létre. A számláló kezdő_értéke 1, a végértéke a szükséges csillagok száma n.) fori:= 1 - n do s :=s+"*"; (a ciklus minden lépésében egy csillag van a sorhoz ragasztva) Writeln(s);(sor kimenet) Readln; vége. Tervpélda: A program csillagokból álló láncot generál. A soronkénti csillagok számát a felhasználó határozza meg.

14. dia

míg hurok

A While ciklus akkor használatos, ha a ciklustörzs ismétlődéseinek száma a programfejlesztés során ismeretlen, és csak a program futása közben határozható meg. Általában a While utasítás a következőképpen írható: While Condition do utasítás; Ahol, a do, szolgálati szavak. A feltétel logikai típusú kifejezés, amely meghatározza a ciklus folytatását.

dia 15

Ha a ciklustörzs több utasításból áll, akkor míg hurok a következőképpen van írva: While Condition do Begin // Loop body End;

16. dia

Tekintsük a While ciklus műveleti algoritmusát: A feltétel ellenőrizve van. Ha a feltétel igaz, akkor a ciklus törzse végrehajtódik. Ezután újra ellenőrzik az állapotot. Ha a feltétel hamis, akkor a ciklus véget ér.

17. dia

Így a While egy előfeltételes ciklus vagy egy „While” ciklus (a ciklus törzse akkor hajtódik végre, amíg a feltétel igaz). Ha a feltétel hamis a ciklus első iterációjában, akkor a ciklus törzse soha nem kerül végrehajtásra. Ha a feltétel soha nem válik hamissá, akkor a ciklus a végtelenségig ismétlődik, azaz. hurkolt lesz.

18. dia

Program Ex2; varAccount: Real; (számla mérete) Hónap: Integer; (a számlanyitás óta eltelt hónapok száma) begin Számla:=1000; (1000 rubel került a számlára) Hónap:=0; (a fiók most nyitott) whileAccount

19. dia

Ismételje meg a hurkot

A Repeat ciklust a While ciklushoz hasonlóan akkor használjuk a programban, ha többször kell végrehajtani a ciklus törzsét, de az ismétlések száma nem ismert előre. Általában az Ismétlés ciklus a következőképpen írható: Ismétlés //Az Until ciklus feltétel törzse; Ahol az Ismétlés, az Addig vannak szolgálati szavak. A feltétel egy logikai kifejezés, amely meghatározza a ciklus végét.

20. dia

Tekintsük a Repeat ciklus algoritmusát: A fenntartott Repeat és Until szavak közötti ciklus törzse végrehajtásra kerül. Az állapotot ellenőrzik. Ha a feltétel igaz, a ciklus véget ér. Ha a feltétel hamis, a ciklus törzse ismét végrehajtódik.

dia 21

Így az Ismétlés egy ciklus utófeltétellel vagy "Előtte" ciklussal (a ciklus törzse addig fut, amíg a feltétel igaz nem lesz). Ezért a huroktörzs legalább egyszer végrehajtásra kerül. Ha a feltétel sosem válik igazzá, akkor a hurok végtelenné válik.

dia 22

Program Ex3; varTime:integer; (osztás ideje) Cellák: egész szám;(cellák száma) kezd Idő:=0;(a cella osztódása még nem kezdődött el) Cellák:=1;(egy cella) Ismétlési idő:=Idő+3;(a következő háromban óra) Cells: =Cells*2;(a sejtek száma 2-szeresére nőtt) Amíg Cells>24; (amíg a "cellák száma nagyobb, mint 24" feltétel teljesül) Writeln(Time);(eredménykimenet) Readln; vége. Tervpélda: Egy egysejtű amőba 3 óránként 2 sejtre osztódik. Határozza meg, hogy hány óra elteltével a cellák száma meghaladja a 24-et.

Az összes dia megtekintése






Előfeltételes hurok Ha az ismétlések száma nem ismert előre, de csak egy feltétel határozza meg, és egy olyan művelet, amelyet csak a feltétel ellenőrzése után kell végrehajtani, használjon ciklust az előfeltételben. Feltételként használt logikai kifejezés, a huroktörzs egyszerű vagy összetett állítás. A ciklustörzs minden végrehajtása előtt a feltétel ellenőrzése megtörténik, ha az eredmény "igaz", akkor a ciklustörzs ismét végrehajtásra kerül, ha "false", akkor a ciklus kilép. A blokkdiagramon Pascalban kezdődik vége; Feltétel Hurok törzs Nem Gyakorlat Hurok kezdete Hurok vége IGEN Míg csinál


Utófeltételes hurok Ha az ismétlések száma nem ismert előre, de csak egy feltétel határozza meg, és a feltétel ellenőrzése előtt végrehajtandó művelet, akkor egy utófeltételes hurkot használunk. Feltételként logikai kifejezést használunk, a ciklustörzs egyszerű vagy összetett utasítás. A ciklustörzs minden végrehajtása után a feltétel ellenőrzése megtörténik, ha az eredmény „false”, akkor a ciklustörzs ismét végrehajtásra kerül, ha „igaz”, akkor a ciklus kilép. A folyamatábrán Pascal ismétlési feltétele Loop törzs Igen Nem Gyakorlat -ig;


Cikk paraméterrel Azokban az esetekben, amikor az ismétlések száma előre ismert, egy paraméteres hurkot használunk. Az ismétlések számát meghatározó változót hurokparaméternek vagy vezérlőváltozónak nevezzük. A ciklustörzs minden egyes végrehajtása után a vezérlőváltozó növekszik vagy csökken, a ciklus addig hajtódik végre, amíg meg nem haladja vagy kisebb lesz a határértéknél. A blokkdiagramon В Pascal X – vezérlőváltozó (hurokparaméter) A – kezdeti érték X, B – végső X C – lépés módosítása X Lépésként csak a következőt használhatja: „to” = 1; "downto" = -1 X:=A,B,C Cikktörzs Gyakorlat X:=A-tól B-ig: Begin End;


Példa egy feladatra előfeltételes hurkot használva Emelje fel a 3-as számot adott hatványra FELADAT: Szóbeli algoritmus: Az X számot, amely kezdetben 1-gyel egyenlő, adott számú alkalommal (N) szorozza meg 3-mal. kezdje H BHBH X:=1 X:=X*3 vége X Adja meg a megadott fokokat Kezdeti értékek „B” fokszámláló B=B+1 Szorozzuk 3-mal Növekményszámláló A kapott értéket adja ki Program Stepen; varH,B,X:egész szám; Kezdje Writeln(Fokozat?); readln(H); X:=1; B:=1; Míg B


H X:=1 X:=X*3 vége X Adja meg a megadott hatványt Kezdeti értékek" title=" Példa egy feladatra utófeltételes hurkot használva Emelje fel a 3-as számot a megadott hatványra FELADAT: Szóalgoritmus: Szorzás az X szám kezdetben egyenlő 1 adott számú (N) 3-mal. kezdés N B>=H X:=1 X:=X*3 vége X Adja meg a beállított teljesítményt Kezdeti értékek" class="link_thumb"> 8 !} Példa egy utófeltételes hurkot használó feladatra Emelje fel a 3-as számot adott hatványra FELADAT: Szóbeli algoritmus: Az X számot, amely kezdetben 1-gyel egyenlő, adott számú alkalommal (N) szorozzuk meg 3-mal. kezdjük H B>=H X:= 1 X:=X*3 vége X Adja meg a kívánt fokot Kezdeti értékek „B” fokszámláló B=B+1 Szorozzuk 3-mal Növeljük a számlálót Adjuk ki a kapott értéket Program Stepen; varH,B,X:egész szám; Kezdje Writeln(Fokozat?); readln(H); X:=1; B:=0; IsmétlésX:=X*3; B:=B+1; Amíg B>=H; WriteIn(Eredmény, X); vége. Nem Igen Pascal elmélet folyamatábra Magyarázatok B:=0 =H X:=1 X:=X*3 vége X Adja meg a beállított teljesítmény kezdeti értéket"> =H X:=1 X:=X*3 end X Adja meg a beállított teljesítményt Kezdeti értékek "B" teljesítményszámláló B=B +1 szorzás 3-mal Növekmény számláló Kimeneti eredmény Program Stepen; Var H,B,X:egész; Begin Writeln(Degree?); Readln(H); X:=1; B:=0; Ismétlés X:=X* 3; B: =B+1;B>=H;Writeln(Eredmény,X);Vége.Nem Igen Pascal-elmélet-folyamatábra magyarázatok B:=0"> =H X:=1 X:=X*3 vége X Enter a megadott mérték Kezdeti értékek" title="Példa egy feladatra utófeltételes hurkot használva Emelje fel a 3-as számot adott hatványra FELADAT: Szóalgoritmus: Adott számú alkalommal szorozza meg az X számot kezdetben 1-gyel ( N) 3. kezdés N B>=H X: =1 X:=X*3 vége X Adja meg a beállított teljesítményt Kezdeti értékek"> title="Példa egy utófeltételes hurkot használó feladatra Emelje fel a 3-as számot adott hatványra FELADAT: Szóbeli algoritmus: Az X számot, amely kezdetben 1-gyel egyenlő, adott számú alkalommal (N) szorozzuk meg 3-mal. kezdjük H B>=H X:= 1 X:=X*3 vége X A kívánt teljesítmény megadása Kezdeti értékek"> !}


Példa egy feladatra egy ciklus használatával a paraméterrel Emelje fel a 3-as számot egy adott hatványra FELADAT: Szóalgoritmus: Az X számot, amely kezdetben egyenlő 1-gyel, adott számú alkalommal (N) szorozza meg 3-mal. kezdje N X:=1 X: =X*3 vége X Adja meg az adott teljesítményt Kezdeti érték X=1 Paraméterek 1-től N-ig Szorozzuk 3-mal Az eredményül kapott értéket adja ki Program Stepen; VarH,B,X:egész szám; Kezdje Writeln(Fokozat?); readln(H); X:=1; B:=1-től H-ig kezdje: X:=X*3; vége; WriteIn(Eredmény, X); vége. B:=1,H,1 Pascal-elmélet folyamatábra magyarázatai




Feladat: Az edzés megkezdését követően a sportoló az első napon 10 km-t futott. Minden nap megemelte a napi kamat az előző napi díj 10%-ával. Mennyi a teljes táv, amit a sportoló 7 nap alatt megtesz. Bemeneti változók: Kimeneti változók: S - teljes távolság d - napok száma Sd - az aktuális nap távolsága


Vége Kérdések a vezérléshez: 1. Melyik operátor Pascalban definiál egy ciklust előfeltétellel 2. Hogyan adjuk meg az "1" és "-1" lépést a paraméterben egy ciklusban 3. Melyik ág lép ki a ciklusból utófeltétellel 4. Van-e hurok 5-ös feltételparaméterrel. Mi lehet a 6. huroktest. Paraméteres hurok használatakor

dia 1

Performer ROBOT Ciklikus algoritmus
Előadás az informatika órára. 9. évfolyam Témakör: Irányítás és algoritmusok

2. dia

FOR i:=1 TO N DO BEGIN művelet1; akció2; VÉGE;
FOR i:=1 TO N DO művelet1; akció2;
1

3. dia

2
WHILE (TRUE) DO BEGIN action1; akció2; VÉGE;
WHILE DO action1; akció2;

4. dia

3
17 sejt
12 sejt

5. dia

4
N1 program; var i:integer; Kezdje Az i:=1-től 12-ig végezze el a RobotForw-ot; RobotLeft; Az i:=1-től 17-ig végezze el a RobotForw-ot; RobotLeft; Az i:=1-től 12-ig végezze el a RobotForw-ot; RobotLeft; Az i:=1-től 17-ig végezze el a RobotForw-ot; RobotLeft; vége.
lefelé haladva
Mozgás jobbra
Fel menni
Mozgás balra
Ez és a következő parancsok balra fordulnak a robot sarkában

6. dia

5
Ha falat teszel, a robot nekiütközik és a program leáll

7. dia

6
N2 program; var i:integer; Kezdje, miközben a FreeForw csinálja a RobotForw-ot; RobotLeft; Míg a FreeForw csinálja a RobotForw-ot; RobotLeft; Míg a FreeForw csinálja a RobotForw-ot; RobotLeft; Míg a FreeForw csinálja a RobotForw-ot; RobotLeft; vége.
Amíg az előrehaladás szabad, futtassa előre a robotot.

8. dia

9. dia

8
Program N3; var i:integer; Kezdje az i:=1-től 4-ig do begin Míg a FreeForw a RobotForw-t; RobotLeft; vége; vége.
Menjen előre négyszer, amíg nincs akadály, és forduljon balra

10. dia

9
Menjen előre négyszer, amíg nincs akadály, és forduljon balra

dia 11

10
Önálló munkához szükséges feladatok
1. feladat. A szituáció bal oldali falához tetszőleges helyen akadályt kell helyezni. A robotnak el kell érnie az 1-es pontot, és vissza kell térnie eredeti állapotába. Megjegyzés: használjon három egymást követő ciklust
1
1

12. dia

11
2. Feladat. A helyzet bal oldali falához tetszőleges helyre rakunk. A robotnak el kell érnie a rakományt, be kell vinnie a raktárba, és vissza kell térnie eredeti állapotába. Megjegyzés: használjon két ciklust sorozatban bye bye

dia 13

12
3. feladat. Öt súlyt helyezünk a helyzet bal oldali falára egy tetszőleges helyre. A robotnak minden árut a raktárba kell szállítania. Megjegyzés: Használjon két sorba kapcsolt BYE hurkot, amelyek egy hurokba vannak beágyazva egy paraméterrel.

14. dia

13
1. példa A robot a folyosó bejárata előtt van. A folyosón belül meg kell jelölni az összes cellát, és vissza kell menni

dia 15

14
Program N7; Indítsa el a RobotForw-ot; Bár nem FreeLeft kezdje Select; RobotForw; vége; RobotBack; Bár nem FreeLeft do RobotBack; vége.
Tegyünk egy lépést előre, hogy belépjünk az alagútba
Amíg a bal oldalon van egy fal, jelölje meg a cellát, és tegyen egy lépést előre
Visszatérünk az alagútba
Amíg a bal oldalon van egy fal, egy lépést hátrálunk

16. dia

15
2. példa Két fal van szögben elhelyezve. A falak hossza tetszőleges. A robot a falak közötti sarokban van (lásd a képet). Olyan programot kell készíteni, amelyben a robot a fal belső oldalán lévő összes cellát megjelöli. A robot véghelyzete tetszőleges.

17. dia

16
Program N8; Kezdje, míg nem FreeRight do start Select; RobotForw; vége; Míg a FreeBack csinálja a RobotBacket; RobotLeft; Bár nem FreeLeft kezdje Select; RobotForw; vége; vége.
Amíg a jobboldal nem szabad, jelölje be a négyzetet, és tegyen egy lépést előre.
A robot visszahozása
Forduljon balra
Amíg a bal oldal nem szabad, jelölje be a négyzetet, és tegyen egy lépést előre.

18. dia

19. dia

18
3. példa Egy fal átfedi a beállítást, és a beállítást két részre osztja. A falban tetszőleges helyen egy ketrec méretű átjáró található. Létre kell hozni egy programot, amelyben a robot megtalálja ezt az átjárót, és a környezet egy másik részébe költözik.

20. dia

19
Program N9; Kezdje RobotLeft; Míg a FreeForw csinálja a RobotForw-ot; RobotRight; Bár nem FreeLeft do RobotForw; RobotLeft; RobotForw; RobotForw; vége.
A robotot a fal felé fordítjuk.
Haladjunk előre, amíg a falnak nem ütközünk
Forgassa el a robotot a fal mentén
Addig haladunk előre, amíg a fal véget nem ér
A robotot a folyosó felé fordítjuk
Két lépést teszünk előre, átlépünk a helyzet másik felébe

A prezentáció leírása egyes diákon:

1 csúszda

A dia leírása:

Az óra témája: „A ciklikus szerkezet algoritmusai. Programozási ciklusok Pascal "Diszciplina" Informatika "

2 csúszda

A dia leírása:

A téma alapfogalmai Ebben a leckében a következő fogalmakat tanulmányozzuk: ciklus fogalma; ciklikus algoritmusok változatai (hurok előfeltétellel, ciklus utófeltétellel, ciklus paraméterrel); ciklikus algoritmusok blokkdiagramjai; hurokoperátorok ábrázolása a nyelvben Pascal programozás; ciklusok alkalmazása a problémák megoldásában.

3 csúszda

A dia leírása:

A ciklus fogalma Sok probléma megoldása során ugyanazt a műveletsort többször hajtják végre. Például felvételkor oktatási intézmény a hallgató vizsgázik, és az általa szerzett pontokat kiszámolja (S változó; kezdőértéke S:=0;). Minden letett vizsgáért N osztályzatot kap. Ha az osztályzat nagyobb, mint "2", akkor S:= S + N; ellenkező esetben állítsa le a számításokat (kilépés a ciklusból).

4 csúszda

A dia leírása:

A ciklus fogalma A ciklus olyan utasítások sorozata, amelyek többször is végrehajthatók. Ciklikus algoritmus egy algoritmust hívunk, amely biztosítja ugyanazon művelet ismételt megismétlését új adatokon Háromféle hurokoperátor létezik: előfeltételes hurkok; hurkok utófeltétellel; ciklusok számlálóval.

5 csúszda

A dia leírása:

Hurok előfeltétellel. WHILE WHILE ciklus A ciklus törzsének végrehajtását utasítja mindaddig, amíg a while szó után írt feltétel igaz. Cikkfolyamatábra előfeltétellel

6 csúszda

A dia leírása:

Hurok előfeltétellel. WHILE WHILE ciklus Előfeltételes hurkot használunk, ha a ciklustörzs ismétlődéseinek száma nem ismert előre, de a feltétel teljesülésétől függ. Ha a feltétel igaz, akkor a ciklus törzse végrehajtásra kerül, majd a feltétel ismét ellenőrzésre kerül, és így tovább, amíg a feltétel hamis lesz.

7 csúszda

A dia leírása:

Előfeltétel hurok operátor (WHILE típusú ciklus) Ennek a leggyakrabban használt ismétlési operátornak Pascal (formátum) általános alakja van: WHILE<условие>DO<оператор>; itt a WHILE, DO foglalt szavak (angolból: while - while, do - do);<условие>- Logikai típusú kifejezés;<оператор>egy tetszőleges (esetleg összetett) operátor.

8 csúszda

A dia leírása:

Hurok utófeltétellel. TO típusú ciklus A ciklus utasítás végrehajtási sorrendje utófeltétellel Az 1-N utasítások végrehajtása addig ismétlődik, amíg a feltétel igazzá nem válik. Ebben a ciklusban a feltétel csak a ciklustörzs végrehajtása után kerül ellenőrzésre. Ebből következik, hogy a testet mindig legalább egyszer kivégzik

9 csúszda

A dia leírása:

Hurok utófeltétellel. FONTOS! Egy utófeltételes ciklus legalább egyszer végrehajtásra kerül, függetlenül attól, hogy a feltétel igaz-e. Az utófeltételes ciklus kétségtelen kényelme, hogy több utasítás írható bele összetett utasítás használata nélkül. Az állapotteszt a huroktest után található. Funkció szó UNTIL

10 csúszda

A dia leírása:

Kezelői hurok utófeltétellel (DO - UNTIL huroktípus) Általános forma A ciklusoperátor (formátuma) Pascal utófeltétellel a következő: Ismétlés<Оператор 1>; <Оператор 2>; … <Оператор N>; Amíg<условие>;

11 csúszda

A dia leírása:

Példa hurokoperátor használatára utófeltétellel Az n=1, 2, 3, 4, 5, 6, 7, 8, 9 és az a=10 változó értékeinek páros megjelenítése a képernyőn, 20, 30, 40, 50, 60, 70, 80, 90 ez az operátor így fog kinézni: n:= 0; ismétlés:=n+1; a:=10*n; writeln(n:2,' ',a:3); n>=9-ig;

12 csúszda

A dia leírása:

Ciklus egy paraméterrel. FOR típusú hurok Egy paraméteres hurkot akkor használunk, ha meghatározott számú huroklépést kell végrehajtani. Meg kell jegyezni, hogy a Pascal FOR ciklusa nem túl rugalmas (ellentétben például az ilyen típusú ciklusokkal a C-ben). Mert Pascalban a ciklusparaméter (vagy számláló) eggyel egyenlő mértékben módosul. Így amikor töredékes lépésre van szükség, WHILE hurkot kell használni. Kétféle FOR hurok létezik: a számláló (vagy paraméter) növelése és csökkentése. Paraméteres hurok blokkvázlata (FOR hurok)

13 csúszda

A dia leírása:

14 csúszda

A dia leírása:

Cikkutasítás paraméterrel. FOR típusú ciklus A for paraméterrel rendelkező ciklusoperátor általános nézete (formátuma).<счетчик> := <начальное значение>nak nek<конечное значение>kezdd el<Операторы>vége; számára<счетчик> := <начальное значение>le<начальное значение>kezdd el<Операторы>vége; növekvő számláló (paraméter) értékekkel, csökkenő számláló (paraméter) értékekkel

15 csúszda

A dia leírása:

Cikkutasítás paraméterrel. FOR-típusú ciklus A FOR-hurok operátor akkor használatos, ha egy programrészletnek meghatározott számú ismétlődésre van szüksége FOR<переменная цикла>: = <начальное значение>HOGY<конечное значение>DO<оператор>; Itt: FOR, TO, DO - fenntartott szavak (angolul: for, before, execute);<счетчик (параметр) цикла>- INTEGER típusú változó, amely a szegmensen változik<начального значения>, eggyel növelve az egyes huroklépések végén;<оператор>- bármely (általában összetett) operátor.

16 csúszda

A dia leírása:

Cikkutasítás paraméterrel. FOR Loop A FOR utasítás egy ciklusfejlécből és egy ciklustörzsből áll. A huroktörzsben szereplő összetett állításokat kezdő és záró zárójelek közé kell tenni. ·A mérő azonosítója általában "i". · A számláló változónak ordinális típusúnak kell lennie. Például egész szám típusa: byte, integer. · A ciklusparaméter kezdő és záró értékeit nem szabad megváltoztatni a ciklus futása közben. · A FOR utasítás a ciklusok fix, előre ismert vagy programvégrehajtás során meghatározott ismétlésszámú rendszerezésére szolgál.

17 csúszda

A dia leírása:

Cikkek alkalmazása feladatok megoldásában A fent leírt ciklusok mindegyike felhasználható Pascalban ugyanazon problémák programozására ciklikus algoritmussal.

18 csúszda

A dia leírása:

1. feladat Nyissa meg a PascalABC.NET programot (integrált fejlesztői környezet Pascal programozási nyelvű programokhoz) Mentse el a programot egy saját nevével ellátott mappába a rendszerben munkamappa PABCWork.NET \ Your_name\Cikl_1.pas Mentés másként...

19 csúszda

A dia leírása:

1. feladat A BYA ciklus segítségével (előfeltétellel), írjon és hibakeressen egy programot, amely kiszámítja a négyzetek összegét természetes számok 1-től 100-ig. KEZDETI ADATOK: A: egész szám; EREDMÉNY - összeg: S: Longint; Program Ex1; A változó: egész szám; S: Longint; ( Hosszú egész szám) Kezdje A:=1; S:=0; ( S változó összeget halmoz fel ) Míg A<=100 Do { Начало цикла – проверка условия } Begin S:=S+A*A; A:=A+1 End; Writeln(‘Вывод результата S= ’ ,S) End. Сохранить программу в папке с Вашим именем в системной рабочей папке PABCWork.NET \ Ваше_имя\Cikl_1.pas

20 csúszda

A dia leírása:

2. FELADAT: Hibakeresés egy ciklikus szerkezetű programban Pascal nyelven a PascalABC.NET környezetben Program abc; var x, y: egész szám; beginx:=2; míg x<= 10 do begin Y:=x*x; writeln(‘вывод х: ’, x, ‘вывод у: ’, y); x:= x+2; end; end. Применить оператор цикла с предусловием для вычисления значения функции y=x2, при значениях x 2, 4, 6, 8, 10. Сохранить программу в папке с Вашим именем в системной рабочей папке PABCWork.NET \ Ваше_имя\Cikl_2.pas