====== A program szerkezete. Kivitel, bevitel. Kifejezések. ====== ===== A Pascal program szerkezete ===== A Pascalon írt forráskód legegyszerűbb szerkezete a következő: program program_neve; var változók deklarálása; begin parancsok, amit a program végrehajtson; end. A teljesebb Pascal program szerkezete a következő: {programfej} {globális hatású fordító direktívák} Program programnev; {Definíciós ill. deklarációs rész} {lokális hatású fordító direktívák} uses {unitok felsorolása} label {cimkék deklarációja} const {konstansok deklarálása} type {típusok deklarálása} var {változók deklarálása} procedure eljarasnev (parameterek); {deklarációk} begin {eljárástörzs} end; function fuggvenynev (parameterek):fuggvény_típusa; {deklarációk} begin {függvénytörzs} fuggvenynev:= utasitas; {függvény eredménye} end; {fõprogram} begin {fõprogramtörzs} end. ===== Kivitel/kiíratás ===== A kivitel, vagyis a szöveges konzolra történő kiíratás a ''Write'' vagy a ''WriteLn'' parancsokkal történik. program Hello; begin Write('Hello!'); end. ===== Formázott kiíratás ===== Formátum érték : mezőhossz érték : mezőhossz : tizedes_jegyek_száma Példa writeln(egesz:10); writeln(valos:10:8); writeln(szoveg:15); writeln(egesz:5, valos: 5:3, szoveg: 12); ===== Bevitel/beolvasás ===== A bevitel, vagyis a szöveges konzolról történő beolvasás a ''Read'' vagy a ''ReadLn'' parancsokkal történik. program Beolvas; var a: real; begin Write('Adja meg az "a" értékét: '); Readln(a); end. ===== Kifejezések ===== Értékadás a '':='' karakterekkel történik. változó_neve := kifejezés; Példa. b := 5; Aritmetikai műveletek a Pascalban: ^ Művelet ^ Elvégzett művelet ^ Operandusok ^ Eredmény ^ | + | Összeadás vagy pozitív előjel | valós vagy egész | valós vagy egész | | - | Kivonás vagy negatív előjel | valós vagy egész | valós vagy egész | | * | Szorzás | valós vagy egész | valós vagy egész | | / | Osztás | valós vagy egész | valós | | div |Egész osztás | egész | egész | | mod |Maradék (maradékos osztás) | egész | egész | program kifejezes; var x: real; begin x := - 1 + 2 / 4 * 5 - 6 mod 4 + 7 div 3; end.