Turbo Pascal , .
CONST, , = :
Const < 1> = < 1>;
< 2> = < 2>;
.......................
< N> = < N>;
, , . .
:
const A=; Sbol=true; revu=9.82; T_k=273;
, , . Type, , ; .
:
TYPE < 1>:< 1>;
< 2>:< 2>;
...............................
< N>:< N>;
Ŕ
, . , .
:
TYPE < > = (< 1>,<2>,...,<N>);
, . , , . . Read Write.
: type animals = (cat, dog, horse, cow);
month = (january, februaty, march, april, may, june, july, august, september, october, november, december);
͔
, . , , .
:
TYPE < > = Min.. Max;
Min, Max - , , . Min, Max . , (real - ). .
|
|
|
: type days = 1..31; temperature = 1..100;
- . ARRAY:
TYPE
< > = array[1..n,1..m,...,1..k] of < >;
n, m, k - ( ) . Turbo Pascal .
: type vector = array[1..50] of real;
massiv = array[1..20,1..25] of string;
nomer = array[1..100] of integer;
datau = array[1..10,1..20,1..30] of char;
STRING .
- . . ( ) 0 255 . string, . , 255 .
TYPE
< >=string[< ];
: type name = string[30];
phone = string[ 7];
- . RECORD.
:
Type < > = record
< 1>:< 1>;
< 2>:< 2>;
.......................
< n>:< n>;
< >;
End;
- :
CASE <> of
<.1>:(< 1>:< 1>,..., < n>:< n>,);
<.2>:(< 1>:< 1>,..., < n>:< n>,);
<.m>:(< 1>:< 1>,..., < n>:< n>,);
, . .
- . . .
SET OF ( ...)
:
TYPE <> = SET OF < >;
TYPE <> = SET OF <min>... <max>; { }
TYPE <> = SET OF (< 1>,<2>,...,<N>); {}
:
¾ , real;
¾ 256;
¾ integer 0... 255;
, , . - . Turbo Pascal : [ x, y ], [ x.. y ], [ ]. , [ ].
|
|
|
:
* + -
= <> IN
<= >=
