PASCAL

Typy danych

1. Liczby całkowite

   1. Byte 0 do 255

   2. Integer -32768 do 32767

   3. Word 0 do 65635

   4. Longlnt -2147483648 do 2147483648

   5. Shortlnt -128 do 127

2. Liczby rzeczywiste

   1. Real

   2. Single, Double, Extended, Comp

3. Zbiór wartości logicznych

   1. Boolean – wartości logiczne: true, false

4. Zbiór znaków

   1. Char

5. Zbiór napisowy

   1. String do 255 znaków, do 256 bajtów

Budowa programu

Program

Const

Var

Procedure/Function

Begin

{główna czesc programu}

End.

Instrukcje

IF… THEN … ELSE

IF wyrażenie logiczne THEN instrukcja_prawda ELSE instrukcja_falsz

Np.

IF (promien>0) THEN Writeln (‘Pole kola =’,pole)

ELSE Writeln (‘Brak rozwiązania! Promien<0’);

REPEAT …UNTIL

REPEAT instrukcja UNTIL wyrażenie logiczne

Np.

REPEAT Write (‘Wprowadź kod PIN’);

Readln (kod_pin);

UNTIL kod_pin=2572;

WHILE … DO

WHILE wyrażenie logiczne DO instrukcja

Np.

WHILE X>0 DO suma:=suma+x;

FOR … TO/ DOWNTO … DO

FOR zm_ster:=x TO y DO instrukcja

Np. FOR x:=1 TO 10 DO suma:=suma+x;

Np. FOR x:=10 DOWNTO 1 DO suma:=suma+x;

CASE … OF

CASE wyrazenie OF

X1: instrukcja1;

X2: instrukcja2;

Xn: instrukcjan;

Np. CASE ocena OF

5: Writeln (‘bardzo dobry’);

4: Writeln (‘dobry’);

TABLICE

Deklaracja tablicy jednowymiarowej

Var identyfikator: array [x..y] of typ;

Np. Var tablica: array [1..100] of word;

Deklaracja tablicy dwuwymiarowej

Var identyfikator: array [x₁..y₁] of array [x₂..y₂] of typ;

Var identyfikator: array [x₁..y₁, x₂..y₂] of typ;

Np. Ocena: array [1..5, 2..5] od word;

Przykłady

1. Wypełnić tablice wartościami 0

2. Wypełnić tablice kolejnymi wartościami 1,2,3…

3. Wypełnić tablice: wiersze parzyste 0, wiersze nieparzyste 1

4. Wyznaczenie wartości minimalnej i maksymalnej (numer wiersza i kolumny)

5. Policzyć ile jest wartości dodatnich, ujemnych, zer

6. Wskazać numer wiersza gdzie jest 0

7. Obliczyć sumę dla każdego wiersza w kolumnie

STRING