Delphi 6



15 1 STRING



15.1. STRING

, .

:

type

colors = (white, red, black);

{ ----- : ----- } const

CurrCol colors = red;

Name String = ' H.' ;

Year Word = 1989;

X Real = 0.1;

Min Integer =0;

Max Integer = 10;

Days 1..31 = 1;

Answer Char = 'Y';

{----- : ----- }

Mass : array [Min..Max] of Real;

{ } a,b,c : Byte =0;

{ }