Turbo
Pascal
Základní
příkazy v Turbo Pascalu
Rozhodl jsem se na toto místo
vložit pár základních příkazů Pascalu pro ty, co tomu rozumí asi
tolik jako já před pár týdny. Dnes to není o moc lepší, ale
alespoň základ snad zvládnu.
1. Základní struktura
programu
program
Pokus; definice
a deklarace begin vlastní
algoritmus end.
2.
Deklarace a definice
a) uses crt,dos;
b) const x=10;
y=1;
s='Honza'; c) type d) var i,j:integer;
s1:string;
e) procedure ; function
3. Datové typy
byte
0..255 integer
-32768..32768 longint
-231..231 real
-1038..1038 word
0..65535
char
znaky ASCII, bere jen jeden, nebo žádný string žádný až 255 znaku ASCII boolean
pravda nebo nepravda (TRUE/FALSE)
4.
Přiřazovací příkaz
proměnná x:=výraz (mat.
operace ve výrazu + - / *) například x:=1+2; nebo
x:=y+8; nebo
x:=(x+3)/2;
DIV
- dělení MOD - zbytek po dělení
například
v:=11 DIV 2
z:=11 MOD 2
5.
Podmínky
if
podmínka then příkaz 1
else příkaz 2
6.
Výstup na obrazovku
write ('Pokus');
vypíše text v uvozovkách a kurzor zůstane za posledním písmenem writeln
('Pokus'); to
samé, akorát po vypsání odřádkuje
7.
Vstup z klávesnice
read (x);
přečte text readln
(x);
přečte text a odřádkuje
8.
Cykly
a) for i:=1 to 10 do příkaz b)
while podmínka do
příkaz c) repeat
until podmínka
9.
Práce s řetězci
S1:='mouka'; S2:='hladká';
S:=S2+S1;
(bez mezery - hladkámouka) S:=S2+'
'+S1;
(s mezerou - hladká mouka)
10.
Pole znaků
var a:array [1..10] of byte;
Další příkazy:
val
- zjistí zda řetězec string obsahuje jenom čísla round
- zaokrouhluje číslo int
- vezme celé číslo gettime
- vrátí hodnotu času (h:m:s:ss) sqrt
- druhá odmocnina
No konečne!! Uf. Tak to už by snad stačilo. Teď nechci Pascal
alespoň dva měsíce vidět.
|