Programozás Pascal

VisualBasic nagyon eltér a szokásos BASIC, sőt, folyamatosan változik verziójukban.

Saját kratenko programozási útmutató Pascal nem állítja, hogy a végső igazság. Ha szükséges, akkor talál egy csomó irodalmat, amely segít javítani ezen a területen. De nehéz és unalmas a kezdők alapvető súlyos munkák. Elvégre ezen összeg, amelyet meghatározott egy egyszerű program nem feltétlenül szükséges. És akkor zanyrnut ebben a csodálatos medence programozás kutatás, nem túl megterhelő agyuk térfogata elmélet?

Saját természetesen pontosan erre a célra terveztek. Minden nagyon egyszerű lesz és megfizethető. Mi megy át a csúcspontja programozás Pascal. számos példát lesz szó, amely segít megérteni, hogyan kell futtatni egy számítógépes program, hogy a kívánt eredményt.

Mert kísérleteink illeszkedik szinte bármilyen változata Pascal burkolat.

Fontolja meg egy egyszerű program: a szorzótábla.

A számítógép végezhet bonyolult számításokat, de kezdeni, megtanulják, hogyan kell rávenni, hogy kövesse az egyszerű. Mivel az oszlop a szorzótábla néz ki, hogy tudja az összes versenyző. Készítsen programot, amely megjeleníti a bárban.

Csak nézd meg jól a két alábbi táblázatok tartalmazzák. Ha azt szeretnénk, hogy megtanulják, hogyan kell programozni, így el kell menni minden alkalommal hozza létre a következő remekmű a programozás.

Néhány darab adat, amely felhasználja, mint egész, mivel a neve: változó.

Mondjuk könnyebb dolgozni a program adatokat változókkal, azaz olyan értékek, amelyek érték megváltoztatásához. Minden változó bármely nyelv három jellemzőit.

Név, típus és érték.

Név - a változó nevét, amelyek alapján úgy kezeli a program.

Típus - azt jelzi, hogy milyen adatokat tárol, mint a karakter vagy szám.

Jelentése - az, hogy specifikusan tárolja a változó, mint például a 10-es számú, vagy 0,55. És ha ez a karakter, például az A betű vagy szó tartozik.

N. egész szám; c. char;
S1. string;
A. array [1..100] az egész;

Mint mondtam, az adatok lehetnek például a változó és állandó. Változatlan adatrészt úgynevezett állandók, és meg lehet határozni például a következők:

const
Min = 0;
Max = 100;
RAZN = (Max - Min) div 2;
Béta = Chr (255);
Mess = 'Out of memory';
Schar = # 13;
Ln10 = 2,30258;
Száma = [ '0' .. '9'];

Igen, úgy néz ki. Ebben a rövid sort egy változó nevű beállítva - a 10-es számú Sokan azt hiszik, hogy tisztában van azzal, hogy ebben az esetben van egy számítógép és egy programot. És ha igen, akkor hossz-és-és, és n-N-s-érve, hogy nem tűnik unalmasnak.

Szembesül egy ilyen szerkezet, a program megkeresi a számítógép memóriájában elkülöníteni erre a változó blokk, amely meghatározza a neve ennek a változó - ebben az esetben A. Ebben a blokkban, amelynek mérete függ a változó típusát: ebben az esetben a numerikus; tegye a változó értékeit: ebben az esetben a 10-es számú Ezt követően, amikor a program megfelel valahol a kifejezést vagy más szerkezet a változó nevét, amelyeket használni fognak nincs jel A és a változó értékét, azaz a 10-es számú, amelyen megadja a nevét és ez a változó, de ez nem más, mint egy A.

Ahhoz, hogy megtanulják, hogyan kell programozni, meg kell csinálni. Tehát itt vagyunk.

Programozás Pascal

Minden olyan program, amely kiszámítja, vagy hogy kezeli. Ezért nem szoftver konstruktsiivychislitelnoe kifejezés nem mert alig egyikük. Kifejezések vannak kialakítva a konstansok, változók, függvények, műveletek jelek és zárójelek bizonyos szintaktikai szabályok.

Zárójelek megváltoztatására a kiértékelés a kifejezés. Kifejezések zárójelek nélkül értékeljük prioritási sorrendben sooglasno műveleteket.

- számolási funkció értékek
- egyváltozós függvények (nem, +, -);
- műveletek, mint a szorzás (*, /, div, mod, és);
- műveletek, mint az összeadás (+, -, vagy, XOR);
- relációs operátorok (=, <>, <,>, <=,>=).

Az építőiparban a számítási kifejezést nézzük egy példát a beépített funkciókat Pascal.

VAR
X. egész;
Y. Valódi;

kezdődik
Write ( „Enter number„); Readln (X);
WriteLn ( 'modul X =', ABS (X));
WriteLn ( 'Sine X =', SIN (X));

Write ( 'Enter igazi'); Readln (Y);
WriteLn ( 'teljes rész Y =', INT (Y));
WriteLn ( 'Root Y =', SQRT (Y): 4: 4);
WriteLn ( 'Véletlen szám =', RANDOM);
WriteLn ( 'Logarithm Y =', LN (Y));
WriteLn ( '(' kerekítve Y =”, kerek (Y));
WriteLn ( 'törtrész Y =', FRAC (Y));
WriteLn ( 'Y nincs törtrész =', TRUNC (Y));

A program szerint a használatát gyakran használt funkcióit Pascal. Minden más funkció lehet tekinteni a saját. Csak nyomja meg a héj Pascal billentyűkombináció Shift + F1, és látni fogja egy nagyon részletes tip. Szinte minden funkció egy demo.

Úgy tűnhet, triviális, de a algoritmikus programozási technológiával, és Pascalispolzuet technológiák, mint módszer azon alapul, következetes részletes algoritmusok. (Ne tegye ki az okos mondat). Ez csupán azt jelenti, hogy egy nagy és bonyolult algoritmus (más szóval, a végrehajtás sorrendje a program) van osztva az egyes elsődleges blokkokat, hogy kell egy szabványos algoritmikus szerkezetek:

Ezek az egyértelműség érdekében képviselteti magát, mint elvi ábrák. Vegyük őket, és példákat a legegyszerűbb programok használata, ezeket a struktúrákat.

kezdődik
Write ( 'Add meg az első tényező:');
Readln (P1);

kezdődik
WriteLn (P1, 'x', I, '=', P1 * I);
végén;

Figyelmeztetés. Belül üzemben tartók Begin - end; akkor tegye több kifejezést, amely esetben úgy kell tekinteni, mint egy egység.
Ebben az esetben, a ciklus törzsének WriteLn (P1, 'x', I, '=', P1 * I); körülvéve elejét és végét; - demonstráció.

A formátum a feltételes állítás Pascal:

ha <условие> majd <оператор 1> más <оператор 2>;

Amikor a feltétel a program feldolgozza az első csoport a piaci szereplők, a nem megfelel a második

Tekintsük a példát
Két szám közül lehet választani a legnagyobb.

Eljárás Hello (Név: string);
kezdődik
Writeln ( 'Hello', név, '!');
Writeln (név, 'hogy vagy?');
writeln;
Vége;


Példa létrehozása és használata funkciói segítséget Pascal.

WriteLn (IntToStr (-5322));
végén.
Magyarázat. Miért kell átalakítani? Ha van olyan program, VAR S. string; K. egész; N. egész; Még ha a WriteLn (S, '-', K); megjelenít egy 5-7, akkor, még mindig lehetetlen, hogy N: = K + S; mert az N és S - a különböző típusú adatok, és az S szükséges, hogy először próbálja átalakítani, hogy egy számot. Ha a farok a kifejezést érti, hogy legyőzte komoly mérföldkő a megértése, hogy milyen típusú adatokat. Ha amíg valami homályos, folyamatosan kísérletezik. Megértés jön váratlanul fokozatosan.

Figyelmeztetés. Funkció belsőleg használ úgynevezett formális változók, amelyek nem láthatók a fő program. De amikor (a funkció) nevezik, ez lesz kezelni a tényleges változók értékei, amelyeket a bejelentett és kívül használják a funkciót.

Ha a program a használni kívánt 10 vagy 100, vagy 1000 típusú változók, azokat azonosíthatóan használatra egy tömbben.

Var Változó neve tömb. Array [index tartomány] típusú elemek;

Példák leíró tömbök:

S, BB. Array [1..40] Real;
N. Array [ 'A' .. 'Z'] egész szám;
R. Array [-20..20] Word;
T. Array [1..40] Real;

Array - egy változó index (szám). Név összes változót egy dolog, de amikor hivatkozva egyes, használjuk a megfelelő számot (index).


Hogyan töltse ki a tömb

Program M2;
Var A. Array [1..10] egész szám;
I. Egész;

Var A. Array [1..n] egész szám;
I. Egész;

A tömbök többdimenziós. A két-dimenziós tömb nevezzük a mátrix.

Var A. Array [1..20,1..30] egész szám;

Elfogadom az első adja sorszám, majd - az oszlop számát.

Tekintsük a példát dolgozik egy mátrix - olyan program, amely kiszámítja a elemek összege található az átlós.
Itt, az értékek a mátrix elemeinek tűzött ki maga elé a számítógép formájában véletlen számokat.

Program M4;
Var A. Array [1..10,1..10] egész szám;
I, K. bájt;
S. egész;

Figyelem! Mátrix számítások, azaz a különböző mátrix műveleteket a mérnöki és tudományos számítások gyakran. Nehéz megnevezni olyan terület, ahol a mátrix nem használható, hisz elektrotechnikai és elektronikai és befejező statisztikák és a biológia, mechanizmusának megértéséhez a munka sok mátrixok hasznos lehet az életben.

Ha a program egy komplex struktúra, például a sok Begin és End-s-s, helyezd el őket úgy, hogy a kezdés és vége egyazon blokk azonos behúzás. Akkor nem összezavarodnak az igazítás.

Az adatok hosszú távú tárolására helyezünk lemezre fájlként. Fájl valamint minden változót kell nyilvánítani, mint ez.

Fájl adattípus.
Ez azt jelenti, hogy a fájl a lemezen kerül egymás rögzített részének a megadott adatok típusát.
Fájl álló karakterlánc nyilvánították Fájl: szöveg; ahol Fájl - változó nevét.

Felhasználás Crt;
var
ch. char;
F. szöveget;
Név, S. string;

kezdődik
Writeln ( '' osztályú listája. '');
Hozzárendelése (F, 'spis.txt');
Átírása (F);
ismétlés
Write ( 'Adja meg a tanítvány nevében, ''); Readln (neve);
WriteLn (F, neve);
Writeln ( 'Next - bármelyik gomb ESC-Exit ..');
ch: = ReadKey;
amíg ch = # 27;

Hozzárendelése (F, 'spis.txt');
Visszaállítása (F);
miközben nem EOF (F) do
kezdődik
Readln (F, S);
WriteLn (S);
végén;
Bezárása (F);

További funkciók bővítik a Pascal, vannak elrendezve modulokat kell nyilvánítani használat előtt


Rendeljen egy fájlnevet, majd a fájl nevét a lemezen
Felülírása a merevlemez. Az adatok tárolásra került a lemez ezen a néven már nem léteznek
Töltsük a listán az osztály fájlt, amíg az Esc gomb megnyomása
Írja be a nevét a tanítvány a fájlban.

Csukja be a fájlt. Az operációs rendszer érzékeli a fájl méretét, és lehetővé teszi, hogy működjön együtt más programok.

Megtagadja a hozzáférést, ha az olvasás nem szükséges,

Gd: = Detect; InitGraph (Gd, Gm, '');
ha GraphResult <> grokkolni majd leállítása (1);
Egy grafikus módban.
CloseGraph;

Graph módok különböző felbontású (a maximális megjelenítési pontok száma vízszintesen és függőlegesen), a képernyő és a számos lehetséges szín.

Vegyük példának a színes kimeneti pontok a programot, amíg egy gombot lenyomva

Ismerje meg, hogyan kell felhívni a különböző geometriai formák.

Felhasználás CRT Graph;
const
Gray50. FillPatternType = ($ AA, 55 $, $ AA, 55 $, $ AA, 55 $, $ AA, $ 55);
var
Gd, Gm. integer;
Színes. szó;
kezdődik
Gd: = Detect; InitGraph (Gd, Gm, '');
ha GraphResult <> grokkolni majd leállítása (1);
Véletlenszerű;

ismétlés
SetColor (Random (GetMaxColor) +1);
Vonal (Random (400), Random (400), Random (400), Random (400));

Kör (Random (500), Random (500), Random (200)); <Окружности>

SetFillPattern (Gray50, Random (15));
Bar (Random (400), Random (400), Random (400), Random (400));

késleltetés (9000);
amíg keyPressed;
CloseGraph;
végén.

Figyelmeztetés. Példák grafika készítő program elvén alapuló képernyővédők - hozza ide a kép, amíg meg nem nyomja meg bármelyik gombot.