Elágazás pascal
Definíció. Az elágaztatást nevezett egy algoritmus, ahol a kiválasztott egy a számos lehetséges kiviteli alakjai a számítási folyamatot. Minden ilyen út egy ága az algoritmus.
Bejelentkezés elágazási algoritmus jelenlétében feltételek ellenőrzési feladatokat. Kétféle feltételek - egyszerű és összetett.
Egyszerű feltételek (attitűd) kifejeződése, amely két aritmetikai kifejezések vagy két szöveges érték (egyébként nevezik őket operandusok) kapcsolódó egyik jele:
<- меньше, чем.
> - legfeljebb.
<= - меньше, чем. или равно
> = - nagyobb, mint. vagy egyenlő
<> - nem egyenlő
= - egyenlő
Általában a teljes formájában feltételes szerkezete a következő:
ha <логическое выражение> majd <оператор 1> más <оператор 2>
A feltételes operátor dolgozik a következő algoritmust.
Első logikai kifejezésnek értékelte érték mögött található Office Word IF. Ha az eredmény igaz. teljesített <оператор 1>, után helyezkedik THEN és akciók után ELSE kimarad; ha az eredmény hamis. éppen ellenkezőleg, az intézkedések után a THEN kimarad, majd mást végrehajtott <оператор 2>.
Feladat.
A kijelző a nagyobb két adott számmal.
Ön is használja a rövidített (hiányos) feltételes lapon.
Ezt a formát használja, ha a feltételek abban az esetben, ha nem tesznek mást.
Hiányos forma feltételes utasítás a következő.
ha <логическое выражение>
majd
Ezután, ha a kifejezés mögött található hivatalos szó IF. ami egy igazi, intézkedéseket hajtottak végre, miután a THEN nyilatkozatot, különben ezek a lépések kimaradnak.
Az irányítási struktúra is megjelenhet, ha rugalmatlan, mivel az intézkedés lehet leírni egyetlen üzemben. Néha szükség lehet végezni sorozata nyilatkozatok. Ebben az esetben szeretnék kötni az egész sorozat a képzeletbeli zárójelben. Pascal előírt ebben az esetben.
Ha az üzemeltető, hogy végre egy sor állítást, azok üzemeltetője zárójelben kezdődik végén. Tervezd hozzákezdene. Vége nevezett vegyületet nyilatkozatot.
ha <логическое выражение>
majd
1 üzemben;
üzemben 2;
.
vég
más
kezdődik
1 üzemben;
üzemben 2;
.
végén;
Definíció. Vegyület nyilatkozata - össze több operátorokat egy csoportban. Csoport utasításon belüli a vegyület az operátor konzol (kezdődik-end).
1 üzemben;
üzemben 2;
Mielőtt hivatalos szó Else szeparátor (pontosvessző) nincs bekötve.
Készítsen programot, amely kínál Ivan Tsarevich kiválasztani a helyes haladási irányt.
Ivan Tsarevich három lehetőség a jövő útját:
jobbra - „A ló elveszíti”
bal - „Head halmozott”
előre. - „A menyasszony fogja találni”
Var p: string;
kezdődik
WriteLn (Hová mész? ');
ReadLn (p);
Ha p = 'right' majd writeln ( 'elveszíti ló');
Ha p = 'bal', majd WriteLn ( 'head halmozott');
Ha p = 'right' majd writeln ( 'Bride találni');
ReadLn;
Vége.
Példaként a program
Hová mész?
egyenes
megtalálni a menyasszony
Hová mész?
jobb
Ön elveszíti a ló
Mivel a hossza a háromszög oldalai, annak megállapítására, hogy a háromszög derékszögű.
Program sum3;
Var a, b, c: real;
kezdődik
Readln (a, b, c);
Ha a * a + b * b = c * C hőmérsékleten, majd writeln ( 'téglalap alakú háromszög')
mást writeln ( 'nem derékszögű');
readln;
Vége.
Példaként a program
A hossza az első oldal
3
A hossza a második oldal
4
A hossza a harmadik fél
5
derékszögű háromszög
A problémák megoldása során gyakran van szükség arra, hogy ne két, hanem egy nagyobb számú lehetőség. Ezt meg lehet tenni segítségével több feltételes utasítások. Ebben az esetben egy új feltételes állítás után írt Akkor és Else kisegítő szó.
Tehát, ha az if megjelenik benne egy másik üzemben, ha azok beágyazott. Ez a ragaszkodás használják számának csökkentése szükséges vizsgálatokat. Ez a módszer gyakran nagyobb hatékonyságot, de egyúttal csökkenti a láthatóságot a program. Nem ajánlott, hogy több mint egy vagy két szint fészkelő ha. A második szinten a beruházások rendkívül nehéz rekonstruálni a szekvencia ellenőrzése feltételeinek egyes feltételes állítás.
A héj kell esnie egy intervallum 30 és 40 km.
Ha ő kapja a résbe, hogy úgy tűnik a felirat: „hit”, különben ha nem érte el „túllövés” vagy „Fly”
ha x> = 30, akkor
ha x <= 40 then
writeln ( „kopogtak”) - beágyazott feltételes operátor
mást writeln ( 'repülés')
más
writeln ( 'undershoot');
v ar a, b: egész szám;
imya. string;
d: char;
kezdődik
Writeln ( 'Mi a neved?');
Readln (imya);
Writeln ( 'Mit fog tenni', imya 'Amellett, illetve a szaporodás?');
Readln (d);
Ha d = '+', akkor
kezdődik
Writeln ( „Add meg az első számot”);
Read (a);
Writeln ( „Add meg a második számot”);
Read (b);
WriteLn ( 'számok összege =', a + b);
vég
más
kezdődik
Writeln ( „Add meg az első számot”);
Read (a);
Writeln ( „Add meg a második számot”);
Read (b);
WriteLn ( 'termék szám =', a * b);
végén;
végén.
Párbeszéd a számítógéppel
Számítógép. „Mi a neved?”
Felhasználó „Bob”
PC: Mit fog csinálni Vasya kívül, illetve a szaporodás? "
A felhasználó beírja a „+” vagy „*”
Ha a „+”:
Számítógép: „Írja be az első számot”
és
Számítógép: „Adja meg a második számot”
b
Számítógép: A összege = ...... "
Ha a "*":
Számítógép: „Írja be az első számot”
és
Számítógép: „Adja meg a második számot”
b
Számítógép: A termék száma = ...... "
Pascal egy speciális operátor, amely lehetővé teszi, hogy válasszon egyet a számos lehetőség. Képzeljünk el egy programot, amely arra kéri a hallgató a bélyegét kalligráfia és reagál rá a megfelelő szöveget:
VAR Otmetka: integer;
WriteLn (Mit védjegy vetted a kalligráfia? ');
ReadLn (Otmetka);
CASE otmetka OF
1,2: WriteLn ( 'Rémálom!');
3: WriteLn ( 'Bármely');
4: WriteLn ( 'rossz');
5: WriteLn (Bravó! ');
ELSE WriteLn (nincsenek jelek)
VÉGE
Az a program alapján az üzemeltető lehetőség CASE (ejtsd „Cayce” lefordítva „esetén”). Kifogás olvasni „eV”. meg kell érteni az összes CASE nyilatkozat az alábbiak szerint:
IF jel EQUAL
1 vagy 2 típusú "Rémálom!
3 típusú „ügy”
-Print 4 'rossz'
5 típus „Bravó!”
AKA „típusú ilyen jelek nem történik”
END esetben nyilatkozat
Végrehajtása során az ügy nyilatkozatot, a számítógép le a változó Otmetka viszont az összes felsorolt értékek a kettőspont előtt. Botladozva egy megfelelő értéket, akkor végrehajtja a megjelenő egy kettőspont után. Ebben az esetben az üzemeltető végrehajtása befejeződik. Ha egy megfelelő értéket, és nem találták meg, akkor az üzemben áll a szó után máshol (a programunkban, hasznos abban az esetben, ha a tanuló beteg megalomániás, és belép a 6-os szám). Miután mást tud állni és a lánc üzemeltetők által rögzített résztől.
Abban az esetben az üzemeltető jelentős korlátozása - egy változó, amely követi a szó esetében, legyen az úgynevezett soros típusú.
mint változó-kiválasztó használhatunk változó egész szám (integer) vagy karakter (char) típusú.
Írja be a vásárlások összegét 1200
Ön megadta az 10% kedvezmény
A vásárlás összegét a kedvezmény: 1080.00 RUB
2. Készítsünk programot, amely összehasonlítja feltüntetett két szám a billentyűzeten. A program kell tüntetni, hogy több, vagy ha a szám egyenlő, megjelenik egy megfelelő üzenetet.
Adjon meg két egész szám
34 67
34 kevesebb, mint 67.
3. A cég gyűjti dolgozók 25-40 év között. Írja be a személy életkorát, és meghatározza, hogy illik a cég (levezetni a válasz 25 év - „még fiatal” 40 évnél idősebb - „Itt az ideje a pihenésre, a” 25 - 40 - „Te illik hozzánk.”)
4. Írjon egy algoritmust, amely a hét napja - egész 1-7
kérdés eredményeként
a neve a tanulságok az osztályteremben a megfelelő napon.