Programozás Delphi - illusztrált bemutató Delphi 7 Starter - nyilatkozat közben

Illusztrált bemutató Delphi 7 Starter

utasítást, amíg

Utasítások (ciklus) A while akkor használjuk, ha egy bizonyos sorrendben tevékenységek (program utasításait) kell végezni többször a szükséges ismétlések számát a fejlődés során még ismeretlen, és csak akkor kell meghatározni a futás során.






Tipikus példák használata ciklus közben számítások adott pontosság keres a tömbben vagy egy fájlt.

Általánosságban elmondható, hogy míg az utasítás van írva a következő:

míg állapota azonban kezdődik

// itt a végrehajtandó utasításokat többször

ahol az állapot - a logikai kifejezés, amely meghatározza a feltétel a hurok utasítást.

1. míg utasítást az alábbiak szerint végezzük:

2. Először is kiértékeli a kifejezést állapotban.

3. Ha a kifejezés értéke feltétel hamis (a feltétel nem teljesül), akkor az, hogy a while utasítás befejeződött.

4. Ha a kifejezés értéke feltétel igaz (feltétel igaz), akkor fuss között helyezkedik el kezdődik és a hurok végét test utasításokat. Ezt követően, a következő feltétel újból ellenőrizni. Ha ez a feltétel teljesül, akkor a ciklus utasítások végrehajtásra. És így addig, amíg a feltétel hamis lesz (hamis).






Algoritmus alábbi while kifejezéssel ábrán látható. 2.14.

Annak érdekében, hogy irányítsák a while ciklus, melyek között található a fejezõdnek hajtottak végre legalább egyszer, az szükséges, hogy mielőtt utasítások végrehajtására, miközben a kifejezés értéke feltétel igaz volt.

Ábra. 2.14. Algoritmus while

Ciklus véget ért, az szükséges, hogy az utasítások sorozata között kezdődnek és végződnek értékét befolyásoló feltétel kifejezése (értékét megváltoztatja változók a kifejezés a feltétel).

Képzeljünk el egy programot, amely kiszámítja az L értéke pontossággal a felhasználó által definiált futási időben. A algoritmuson alapul, hogy az összeg a sorozat 1 - 1/3 + 1/5 + 1/9 + -1/7. megközelíti az értéke n / 4 elegendően nagy számú kifejezések a sorozat.

Minden távon a sorozat az N szám alábbi képlettel számítottuk ki: 1 / (2 * n - 1) szorozzuk mínusz egy, ha n páros (annak megállapítása, hogy n páros, ellenőrizheti a maradék Division n értéke 2). Számítás ér véget, amikor egy másik tagja számos érték lesz kisebb, mint az előre meghatározott számítási pontosságot.

Tekintse Program párbeszédablak futása ábrán látható. 2.15. A felhasználó belép a számítási pontosságot a beviteli mező (Editi). A kattintás után a parancs gombra kiszámolása (Buttonl) program kiszámolja a literben, és kiadja az eredményt az mezőcímkét (Labeii).

A szöveg a program listán látható 2.6. Mint az előző példákban, a fő munkát a OnClick esemény eljárást.

Ábra. 2.15. Párbeszédablak jelenik számítani Pi

Listing 2.6. A számok azt

egység pi_; felület

Ablakok, üzenetek, SysUtils, osztályok, grafika,

Controls, Forms, Dialogs, StdCtrls;

Edit1: tSzerkesztés; // számítási pontossága

Button1: TButton; // számolja gomb




Kapcsolódó cikkek