Já, a spolu se mnou stovky, možná i tisíce dalších, jsme všichni začínali jazykem Pascal. Jedná se o starý (vznik je datován do sedmdesátých let minulého století) jazyk, který byl primárně určen k výuce programování, k čemuž splňuje základní parametr – jednoduchost.
Příkazy jsou jednoduché (ale někde jsem četl, že i v Pascalu někdo napsal 3D engine), srozumitelné, a proto zdlouhavé na zápis (což je hlavní protiargument Céčkařů).
Nehledě na to, že nejpoužívanější vývojové prostředí pro jazyk Pascal, Turbo Pascal vytvořila společnost Borland international (která také vytvořila vývojové prostředí pro jazyk C, nebo ObjectPascal-Delphi) je považována za v tomto oboru velmi profesionální. Dokonce i na vysoké, se jazyk Pascal zmiňoval v mnoha pozitivních ohledech: Katalogové funkcionální paradigma, dokonalá a přesně definovaná syntaxe (řízená několika málo základními pravidly – které to však bravurně zvládají), nebo na svou dobu poměrně moderní systém detekce chyb ve zdrojovém kódu.
Vymyslel jsem následující ukázkový program, kde se pokusím naznačit, že jazyk je opravdu jednoduchý na pochopení a jak já sám říkám, Pascal, to je lámaná angličtina
. Některé nesrovnalosti v překladu jsou { okomentovány }.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 |
program Toto_je_pokusny_program; uses crt; var a,b:integer; {VAR=VARiables} cislo:real; begin clrscr; {CLRSCR=CLeaR SCReen} writeln('Vítej uživateli. Zprvu zadej nějaké číslo'); {=WRITE, new LiNe} readln(a); if a>=0 then write('zadané číslo je nezáporné (nula nebo kladné)') else begin write('zadané číslo je záporné, převedu jej na kladné'); a:=-a; end; for b:=1 to a do write(b,' '); writeln('nyní zadej číslo menší než 10); repeat readln(a); until a<10; delay(1000); {1000ms = 1s} writeln('Stiskem libovolné klávesy program ukončíš.'); repeat until keypressed; end. |
By doslovně přeložen do češtiny vypadal přibližně nějak takto:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 |
program Toto_je_pokusny_program; používej crt; {příkazy z knihovny nazvané CRT} proměnné a,b:celočíselné; cislo:reálná; Začni hlavní program vyčisti obrazovku vypiš a odřádkuj: 'Vítej uživateli. Zprvu zadej nějaké číslo' načti a je-li a>=0 pak vypiš 'zadané číslo je nezáporné (nula nebo kladné)' jinak začni tento blok přikazů vypiš 'zadané číslo je záporné, převedu jej na kladné' a:=-a {proměnné a přiřaď hodnotu -a} zkonči tento blok příkazů pro b:=1 do a dělej vypiš b a ' ' vypiš a odřádkuj 'nyní zadej číslo menší než 10 opakuj načti(a); dokud nebude a<10 zpozdi 1000 {počkej 1000 milisekund} napiš a odřádkuj 'Stiskem libovolné klávesy program ukončíš.' opakuj dokud nebude stiskunta klávesa Ukonči hlavní program. Tečka |
Vidíte, že pokud se nad tím překladem trochu zamyslíte, docela i dává smysl. Prostě Pascal je opravdu dobrý jazyk na pochopení základů programování a algoritmizace a po něm pak můžete přejít na kterýkoliv vyšší jazyk. Kamarád mi sice říkal, že vás Pascal naučí určitým zlozvykům (největším je asi přílišná aktivita programátora) avšak já bych řekl, že mi byl Pascal rozhodně jen a jen ku prospěchu.