Standardní funkce jazyka Pascal. Standardní funkce jazyka Pascal ABC Standardní funkce jazyka Pascal

Výrazy

Konstanty a proměnné

Konstanty a proměnné mohou nabývat hodnot libovolného z povolených datových typů v rámci specifikovaných rozsahů.

Konstanty definují hodnoty, které jsou známy před spuštěním programu. Pokus o přiřazení nové hodnoty konstantě za běhu programu bude mít za následek chybu. Proměnné, na rozdíl od konstant, mohou během výpočtů nabývat různých číselných hodnot.

V PC každá proměnná odpovídá určité oblasti paměti, do které je uložena její hodnota.

Výraz je syntaktická jednotka jazyka, která definuje způsob výpočtu určité hodnoty. Výraz může obsahovat konstanty, proměnné, standardní funkce, znaménka aritmetických operací a závorky.

Výpočet hodnot výrazu se provádí v určitém pořadí, jak je uvedeno v tabulce 2.3.

Tabulka 2.3

Pro výpočet nejčastěji používaných funkcí obsahuje knihovna Pascal odpovídající podprogramy (tabulka 2.4), které počítají hodnoty hlavních standardních funkcí. Jako argumenty funkce lze použít konstanty, proměnné a výrazy.

Například: Sin(X) + Cos(A/2+Z) - Log(7).

Při používání standardních funkcí mějte na paměti následující:

1) název funkce musí přesně odpovídat názvu;

2) argument musí být uzavřen v závorkách a jeho typ musí odpovídat typu uvedenému v tabulce 2.4.

Tabulka 2.4

Nahrávání v Pascalu	Název funkce	Typ argumentu	Typ výsledku
Abs(X)	Absolutní hodnota	Celé číslo Skutečné	Stejné jako typ X
Sqr(X)	Vypočítává X ve 2. stupni	Celé číslo Skutečné	Stejné jako typ X
Sin(X) Cos(X) ArcTan(X)	Sinus, kosinus a arktangens X	Celé číslo Skutečné	Nemovitý
Exp(X)	Exponenciální funkce e x	Celé číslo Skutečné	Nemovitý
Ln(X)	Přirozený logaritmus	Skutečné nebo celé číslo	Nemovitý
Exp10(X) Log(X)	Tyto funkce jsou podobné jako Exp( X) a Ln( X), ale v základu 10	Skutečné nebo celé číslo	Nemovitý
Sqrt(X)	Druhá odmocnina čísla X	Skutečné nebo celé číslo	Nemovitý
Lichý (X)	Vrátí True if X liché a nepravdivé, pokud X upřímný	Celý	Boolean
Trunc(X)	Vrátí celý díl X, zlomková část se zahodí	Nemovitý	Celý
kolo (X)	kola X na nejbližší celé číslo	Nemovitý	Celý

Poznámka. Tečna X se počítá jako ; Umocnění se provádí pomocí následujícího vzorce: a x =Exp (x*Ln(a)) .

Aritmetické operace jazyka Pascal ABC

STRUKTURA PROGRAMU. POPIS PROMĚNNÝCH V PASCALU ABC

Cíl práce Prostudujte si strukturu programu. Osvojte si uživatelskou práci při popisu proměnných různých typů při práci v integrovaném prostředí PASCAL ABC 7.0.

PODEPSAT	VÝRAZ	ÚKON
+	A+B	PŘIDÁNÍ
_	A–B	ODČÍTÁNÍ
*	A*B	NÁSOBENÍ
/	A/B	DIVIZE
DIV	Div B	CELÉ DIVIZE
MOD	Mod B	ZBYTEK CELÉ DIVIZE

Funkce	Funkce
Frac(x)	Zlomková část x
Int(x)	Celý
Ln(x)	Přirozený logaritmus
Pi	Konstantní hodnota π
Abs(x)	Absolutní hodnota (číslo modul)
arktan(x)	Arctanges x
cos(x)	Kosinus x
Exp(x)	e - expanze
Náhodný	Náhodné číslo od 0 do 1
Náhodný(n)	Náhodné číslo od 0 do n
Lichý (x)	Pravda, pokud je x liché Nepravda, pokud je x sudé
hřích(x)	Sinus x – (v radiánech)
Sqr(x)	Náměstí argumentů
Sqrt(x)	Odmocnina
Trunc(x)	Nejbližší celé číslo, které nepřesahuje argument modulo (oříznutí zlomkové části čísla x)
kolo(x)	Zaokrouhlete na nejbližší celočíselný argument

Úkoly 1

Vypočítejte měsíční splátky m na půjčku s rublů na n let s úrokem p. Výpočty se provádějí pomocí vzorců:

Zadejte text programu:

Udělej si sám:

1. Jsou uvedeny délky tří stran trojúhelníku A , b , C . Vypočítejte obvod a plochu trojúhelníku pomocí Heronova vzorce

2. Vypočítejte hodnotu výrazu pomocí vzorce (všechny proměnné mají reálné hodnoty):

1. Spusťte program a zkontrolujte jeho činnost;

2. Zobrazit výsledek programu;

Aritmetické funkce

Aritmetické funkce lze použít pouze s celými a reálnými hodnotami.

Funkce	Účel	Typ výsledku
abs(x)	absolutní hodnota argumentu	odpovídá typu argumentu
sqr(x)	čtverec argumentu	odpovídá typu argumentu
sqrt(x)	druhá odmocnina argumentu	nemovitý
cos(x)	kosinus argumentu	nemovitý
hřích(x)	sinus argumentu	nemovitý
arctan (x)	arkustangens argumentu	nemovitý
exp(x)		nemovitý
	přirozený logaritmus	nemovitý
int(x)	celočíselná část čísla	nemovitý
frac(x)	zlomková část čísla	nemovitý

Typ funkce převodu

Tyto funkce jsou navrženy pro převod typů hodnot, jako je znak na celé číslo, reálné číslo na celé číslo atd.

Funkce pro ordinální veličiny

8 Operátor přiřazení

Tento operátor dává pokyn k zapamatování určité hodnoty v proměnné. Hodnota a identifikátor proměnné jsou odděleny dvojicí znaků := . Typy objektů na obou stranách nápisu := musí striktně odpovídat, kromě případů, kdy je typ proměnné REAL a typ výrazu je INTEGER. Celkový pohled na operátora:< переменная >:= < выражение >

I/O operátoři

Existuje jen málo programů, které se obejdou bez zadávání dat, a neexistuje žádný, který by výsledky nevydával.

Zadávání dat z klávesnice je prováděno operátory: READ a READLN. Formát: Číst (seznam proměnných);

Readln(seznam proměnných);

Písmena ln jsou přidána na konec příkazu, takže kurzor se automaticky přesune na další řádek, když se na obrazovce zobrazí text nebo výsledky provádění programu. Například:

Readln(x, y, z); Read(beta, gama);

Při provádění příkazu READ(READLN) se program zastaví a čeká, dokud není z klávesnice zadán požadovaný počet čísel.

Výstup dat na displej je prováděn operátory: WRITE a WRITELN. Formát:

Write(seznam výrazů); Writeln(seznam výrazů);

Výrazy v seznamu jsou odděleny čárkami. Hodnoty výrazů se nejprve vypočítají a poté zobrazí. Při zobrazování skutečných hodnot můžete určit, kolik desetinných číslic se má uložit ve zlomkové části čísla, přičemž počet číslic je zadán po šířce pole za dvojtečkou.

Aby bylo možné komentovat výstupní hodnoty, lze do výstupního seznamu umístit řetězce libovolných znaků uzavřených v apostrofech.

9. Podmíněný operátor-li. Celkový pohled na if<условие>pak<действие 1>; jiný<действие 2>;

Operátor -li lze použít bez druhé části

Pokud je nutné splnit několik podmínek, pak používáme následující typy záznamu (podmínka 1) a (podmínka 2) - v tomto případě musí být splněny jak 1, tak 2

(podmínka 1) nebo (podmínka 2) – v tomto případě je nutné provést výběr!

I/O rutiny

I/O je spojena s výměnou informací mezi RAM a externími paměťovými médii (vstupní/výstupní terminál, ADPU, HDD (disketa), LMD (pevný disk) a další zařízení).

V jazyce Pascal jsou standardními prostředky komunikace mezi osobou a počítačem předdefinované vstupní a výstupní soubory, které jsou standardně parametry programu. Program přijímá vstupní data ze vstupního souboru a umístí výsledek zpracování do výstupního souboru. Ve výchozím nastavení je vstupní soubor přiřazen klávesnici a výstupní soubor je přiřazen obrazovce terminálu.

Existují následující typy vstupních operátorů (procedury čtení):

ČTĚTE (A1,A2,A3,...,AN)

READLN (A1,A2,A3....AN)

kde A jsou proměnné, kterým jsou postupně přiřazovány vstupní hodnoty.

Během provádění programu, jakmile narazí na příkaz READ (READLN), počítač se „zastaví“ a čeká na zadání číselných, symbolických hodnot. Po zadání hodnot a stisknutí klávesy Enter pokračuje provádění programu. Po zadání dat pro každý postup čtení se stiskne klávesa Enter. Hodnoty se zadávají po (alespoň) jedné mezeře po napsání celého programu a jeho spuštění ke spuštění.

Operátor READLN (A1,A2,...AN) nejprve zadá hodnoty proměnných a poté se na rozdíl od operátoru READ (Al, ...,AN) přesune na nový řádek.

Použití vstupního příkazu bez parametrů READLN jednoduše přejde na nový vstupní řádek. Operátor READLN (A1....AN) je ekvivalentní použití 2 operátorů READ (Al.....AN) a READLN.

Například:

1) VAR A, B.: REAL

C. D: INTEGER;

ČTĚTE(A.B);

READ(C,D);

READLN(A,B);

READLN(C,D);

ČTĚTE(A.B);

READ(C.D);

V prvním případě po zadání každého páru dat do jednoho řádku stiskněte klávesu Enter. V druhém případě je postup čtení podobný. Rozdíl je v tom, že po načtení hodnot A a B prvním postupem čtení se data pro další postup čtení načtou od začátku nového řádku, tzn. sada dat pro proměnné A, B, C, D pro první a druhý případ bude vypadat takto:

1) 4,83 E - fZ 35,71 E + f1Enteg 51 2134 Enter

2) 4,83 E - f3 35,71 E + f1Ep1eg

Lze zadat celočíselná, reálná a znaková data. Zadávání znakových dat má své vlastní zvláštnosti, protože mezera, stejně jako jakýkoli znak v jazyce Pascal, je klasifikována jako znaková data. Znaková data se zadávají jako souvislá čára. Například:

VAR A.B.C.D: CHAR;

READ(A.B.C.D);

Na klávesnici zadejte Kyiv a stiskněte klávesu Enter. Proměnné obdrží následující hodnoty: A-"K", B-"I", C-"E", D-"B". Další vlastností zadávání znakových dat je, že samotné stisknutí klávesy Enter je vnímáno jako znak mezery, proto se pro správné zadání doporučuje před každý operátor pro zadávání znakových dat vložit operátor READLN, aby se zadávaly vždy na nový řádek.

Existují následující typy inferenčních operátorů.

ZAPIŠTE (A1,A2.....AN);

ZÁPIS (A1,A2,...,AN);

WRITELN;

Parametry A1, A2,..., AN mohou být celočíselné, reálné, znakové (řetězcové) a logické proměnné.

Je povolen formátovaný výstup a datový výstup s formáty, které určují šířku pole výběru.

U bezformátového výstupu je pro výstupní hodnoty proměnných různých typů přidělen standardní (definovaný pro konkrétní třídu strojů) počet pozic. Například pro počítače PC EC PC IBM.

Celková délka pole pro hodnotu reálné proměnné Type zabírá 18 pozic a zlomková část samotného čísla zabírá 10 pozic.

Výstupní formáty ve výstupním příkazu jsou specifikovány dvojtečkou za výstupní proměnnou. U reálných čísel se může formát skládat ze dvou veličin. První označuje obecné pole výstupní hodnoty, druhé - pole zlomkové části. V tomto případě obecné pole obsahuje znak čísla, desetinnou čárku a počet číslic v celé a zlomkové části.

Zde je několik příkladů výstupu dat s formáty pro výše uvedené hodnoty proměnných.

Při výstupu hodnoty reálné proměnné B je v prvním případě použit formát s plovoucí desetinnou čárkou (normalizovaný formát) s desetinným faktorem - latinským písmenem E (které odděluje mantisu čísla od pořadí). Minimální délka výstupního pole je 8 znaků. Ve druhém případě je hodnota B na výstupu ve formátu s pevnou čárkou.

Pokud je vybrané pole formátu větší než počet pozic obsazených číslem, pak bude odpovídající počet mezer přidělen před celočíselnou částí a odpovídající počet nul bude přidělen za zlomkovou částí.

První část poslední poznámky platí i pro případy výstupu hodnot znaku, řetězce a logických proměnných

Funkce	Účel	Typ argumentu	Typ funkce
Abs(x)	Výpočet absolutní hodnoty X	R, I	R, I
hřích(x)	Vypočítejte hodnotu funkce SIN arg. X	R, I	R, R
cos(x)	Vypočítejte hodnotu funkce COS arg. X	R, I	R, R
arktan(x)	Vypočítejte hodnotu args funkce ARCTG. X	R, I	R, R
SQR(x)	Vypočítá hodnotu druhé mocniny argumentu.	R, I	R, I
SQRT(x)	Vypočítá hodnotu druhé odmocniny X	R, I	R, R
EXP(x)	Výpočet hodnoty exponenciální funkce argumentu.	R, I	R, R
EXP10(x)	Výpočet 10 na mocninu X	R, I	R, R
Ln(x)	Výpočet hodnoty funkce přirozeného logaritmu argumentu.	R, I	R, R
LOG(x)	Výpočet hodnoty dekadického logaritmu argumentu	R, I	R, R
TRUNC(x)	Nalezení celé části X	R, I	já, já
INT(x)	Vyhodnocení celé části argumentu	R, R	R, R
KOLO(x)	Zaokrouhlí X na nejbližší celé číslo.	R, I	já, já
FRAC(x)	Vypočítá zlomkovou část argumentu	R	R
ODD(x)	TRUE, pokud X je liché číslo; FALSE, pokud X je sudé číslo;	já	B
ORD(x)	1. Zjištění čísla hodnoty výčtového typu 2. Zjištění čísla symbolu jazyka Pascal (v desítkové soustavě)	Výčet	C
já já	Určení symbolu jazyka Pascal podle jeho sériového čísla.	já	C

OBECNÝ ÚKOL

1. Studujte sami

a) vytvoření nejjednodušší programové struktury v Pascalu;

b) datové typy, popis konstant, proměnných, standardní funkce;

c) pravidla pro psaní početních výrazů.

2. Seznamte se s obecnými informacemi a metodickými pokyny pro tuto laboratorní práci.

3. Vytvořte algoritmus a program pro řešení navrženého problému.

4. Odlaďte pracovní program na PC. Vytiskněte výpis programu, vstupní data a výsledek výpočtu.

Jednotlivé úkoly

Spočítejte si na počítači:

1. s c = 0,7; m=0,3'10-2; a=5; n = 1,2
2. při r=5; k = 1,24'10-7; t=0,1'10-6;z=0,5'10 2
3. ; s a=0,1; b = 1,4; a = 0,02; z=3'10-3; k = 4,5
4. ; s a=3,4; b = 1,1; c=9
5. ; , při 5 = 0,8; b = 1,5; a=3; a = 0,394
6. ; s A = 0,1; b = 0,6; c = 2,4'10-4; t = 15
7. ; s a=0,1; b = 88; c=0,2'10-6
8. ; s a=0,3; b = 0,9; c = 0,61
9. ; s a=38,9; b = -4,7; c=5; z = 0,8
10. ; s a=15,123; b = 9,563; z = 0,717
11. ; s a=0,5; b = 3,1; c = 1,4
12. ; s a=4,4; b = 0,57; c=6; z = 0,054
13. ; s a=0,5; b = 2,7; c = 0,4;
14. ; , při a=4,5'10-4; b = -2'10-5; c=25
15. ; s a=9,6; b = 8,2; c=2; k=0,7
16. ; s a=1,256; b = -13,5; c=4
17. ; s a=1,256; b = 3,5; c = 0,53; z=7
18. ; s a=2,8; b = 16,4; c = -5,4
19. ; s a=2,953; b = 0,254; c = 0,5
20. ; s a=4,125; b= -1,234; c = 0,487
21. ; s a= -0,92; b= 0,58
22. ; s a=1,725; b=19; c= -2,153
23. ; s a=3,457; b = 3,1; c=2
24. ; s a=2,389; b = 3,1; c=17
25. ; s a=-0,5; b = 1,7; t = 0,44
26. ; s a=0,816; b = 3,4; c = 16,7
27. ; s a=1,1; b = 0,2; c=4'10-3

Kontrolní otázky

1. Které z následujících názvů proměnných jsou povoleny nebo zakázány v Turbo Pascalu?

KAFEDRA_SAPR	HELP+ME
KAFEDRA SAPR	pomoz mi
KAFEDRASAPR	ABC...XYZ
OKT16	PRO
160 KT	SIGMA
ABVGD	SIGMA?
abvgd	číslo 1
BVGD	číslo 1
A.B.V.G.D.	XXXXXXXXXXXX

2. Je možné v programu měnit hodnoty konstant?

3. Které z následujících přiřazovacích příkazů jsou správné, jestliže proměnné

I,J,K:INTEGER;

X,Y:REAL;

A,B:BOOLEAN

A:=(X K);

I:=I+K/I;

X:+I+J-B;

4. Je přijatelné používat v aritmetických výrazech množství různých typů?

5. Která z následujících položek jsou správná z hlediska jazyka Pascal?

"A"<"В" ; "А"<"В" AND 4<5;

PRAVDA>NEPRAVDA; ("C"<"D") OR (4<5);

"8"<"3" ;

6. Je možné přiřadit výraz reálného typu k proměnné celočíselného typu a naopak k proměnné reálného typu - výrazu celočíselného typu?

7. Jaké funkce jsou určeny k převodu hodnot skutečného typu na hodnoty celočíselného typu?

8. Najděte chyby v programu RM1 (pokud existují) a opravte je.

PROGRAM;

(Program pro ovládání)

VARY X: CELÉ ČÍSLA, Y SKUTEČNÉ X + 3: = Y;

Y:=Y + 5,7;

Z:= 4X + 9Y

Například: 11 div 5 = 2 10 div 3 = 3 2 div 3 = div 4 = div -5 = div 5 = div -5 = 3 10 mod 5 = 0 11 mod 5 = 1 10 mod 3 = 1 14 mod 5 = 4 17 mod - 5 = mod 5 = mod -5 = -2

0 a b>0 platí: A mod b = a – (a div b)*b (a div b)*b + (a mod b) = a Poznámka: operaci mod lze použít ke zjištění, zda je celé číslo násobek celého čísla " title=" Vztah mezi operacemi div a mod Argumenty operací div a mod jsou celá čísla. Pro a>0 a b>0 platí následující: A mod b = a – (a div b)*b (a div b) *b + (a mod b) = a Všimněte si, že operaci mod lze použít ke zjištění, zda je celé číslo násobkem celého čísla" class="link_thumb"> 6 !} Vztah mezi operacemi div a mod Argumenty operací div a mod jsou celá čísla. Pro a>0 a b>0 platí následující: A mod b = a – (a div b)*b (a div b)*b + (a mod b) = a Poznámka: operaci mod lze použít k nalezení z celého čísla a na celé číslo b. Konkrétně a je násobkem b právě tehdy, když a mod b = 0 0 a b>0 platí: A mod b = a – (a div b)*b (a div b)*b + (a mod b) = a Poznámka: operaci mod lze použít ke zjištění, zda je celé číslo násobek celého čísla "> 0 a b>0 platí: A mod b = a – (a div b)*b (a div b)*b + (a mod b) = a Všimněte si, že lze použít operaci mod zjistit, zda je celé číslo násobkem a k celému číslu b Konkrétně a je násobkem b právě tehdy, když a mod b = 0"> 0 a b>0 platí: A mod b = a – (a. div b)*b (a div b)*b + (a mod b) = a Všimněte si, že operaci mod lze použít ke zjištění, zda je celé číslo násobkem celého čísla" title="Relationship between operace div a mod Argumenty operací div a mod jsou celá čísla Pro a>0 a b>0 platí: A mod b = a – (a div b)*b (a div b)*b + (a). mod b) = a Všimněte si, že operaci mod lze použít ke zjištění, zda je celé číslo násobkem celého čísla"> title="Vztah mezi operacemi div a mod Argumenty operací div a mod jsou celá čísla. Pro a>0 a b>0 platí následující: A mod b = a – (a div b)*b (a div b)*b + (a mod b) = a Poznámka: operaci mod lze použít k nalezení zda celek jako celek"> !}

Určete počet zbývajících kanálů, pokud by byly rozděleny do 5 lidí write (Počet kanálů = "); readln (a); b:= a mod 5; writeln(Zbývající, b, kanál);

Relační operace Nerovná se Menší než = Rovná se Větší než = Menší nebo rovno Větší než nebo rovno = Menší nebo rovno Větší než nebo rovno"> = Menší nebo rovno Větší než nebo rovno"> = Menší nebo rovno Větší než nebo rovno" title="Relační operace Nerovná se Menší než = rovno větší = menší nebo rovno větší nebo rovno"> title="Relační operace Nerovná se Menší než = Rovná se Větší než = Menší nebo rovno Větší než nebo rovno"> !}

Vypočítejte přeponu pravoúhlého trojúhelníku (délka nohou - a a b) napište ("a="); readln(a); napište("b="); readln(b); c:= sqrt (sqr(a) + sqr(b)); writeln("c=", c:5:2);

Vypočítejte modul rozdílu mezi čísly a a b napište ("a="); readln(a); napište("b="); readln(b); c:= abs (a - b); writeln("module=", c);

Exponent a logaritmus Exp (x) ln x (přirozený logaritmus) Ln (x) e x (exponent čísla, e) Exp (b*Ln (a)) ab ab

Příklady použití DIV a MOD: Operace DIV a MOD se často používají k analýze čísel, například k získání číslic, které tvoří číslo. Úkol: Zadejte z klávesnice třímístné číslo. Určete součet jeho číslic a vytiskněte tyto číslice v opačném pořadí.

Nechť proměnná a obsahuje hodnotu daného čísla. Číslice čísla a označujeme takto: i - počet stovek; j – počet desítek; k - počet jednotek; s je součet těchto čísel. Program MojeČíslo; UsesCrt; Var a, i, j, k, s: celé číslo; Begin clrscr; Writeln (Zadejte 3místné číslo); Readln(a); i:=a div 100; (počet stovek) j:=a div 10 mod 10; (desítky) k:=a mod 10; (počet jednotek) s:=i+j+k; Writeln(součet číslic čísla,a,=,s); Writeln(k, j, i); Readln; Konec.

Standardní funkce Pascalova funkceMatematický zápis Jméno Abs(x)|X||X| Absolutní hodnota čísla X (modul) Sqr(x)Х2Х2 Zvýšení čísla Exp(x)exex Exponent Sqrt (x) x Výpočet druhé odmocniny Exp(b*ln(a)) abab Zvýšení čísla Zaokrouhlení (x) Kola na nejbližší celé číslo Trunc (x) Odřízne zlomkovou část Sin(x)sinx Vypočítejte sinus Cos(x)сosx Vypočítejte kosinus

Odpovědi 1.1.68 4.2.06 5.1.10 6.2.16 7.3.05 8.0.10

2. Je uvedeno třímístné číslo. První číslo vlevo bylo přeškrtnuto a přidáno vpravo. Vytiskněte výsledné číslo (Například) 3. Je uvedeno třímístné číslo. Vytiskněte číslo získané přeskupením desítek a jednotek původního čísla. (Například,)