Урок 3. Константы в Turbo Pascal

Постоянная, или константа (лат. constanta — постоянная, неизменная) — некоторая величина, не изменяющая своё значение в рамках рассматриваемого процесса.

В пронраммирование константа - это некая постоянная велечина, которая на протяжянии всей программы не изменяется. К примеру в программе из первого урока константой можно объявить слово "Привет". Рассмотрим программу "Hello world!" с использованием константы.

Program Hello_World_With_Const;
Uses Crt;

Const hello = 'Привет, ';

Var name:string;

Begin
	ClrScr;
	Write('Введите имя: ');
	Read(name);
	Write(hello, name, '!');
	ReadLn
End.

В данном случае мы объявили константу hello равную значению 'Привет, '. Далее в программе достаточно в нужном месте подставить эту константу. Теперь если нам вдруг понадобиться вместо программы, которая здоровается, сделать программу, которая прощаеться, достаточно в начале программы поменять "Привет, " на "До свидания, " и программа будет прощаться с пользователем.

Если Вы обратили внимание, то в примере у константы не указан явно не указан тип, такие константы называются Обычными константами. Тип обычных констант определяется по их значению.

Помимо обычных констант существуют Типизированные константы. Тип таких констант объявлеться явно:

Const
	Stroka :string = 'Привет';
	Number :Integer = 777;
	Pi :Real = 3.14159;

Дополнительно хочется обратить внимание на аппострафы в константах. Если Вам в константе понадобтся использовать аппострофы, то просто продублируйте их:

Const
	stroka = 'I''m a programmer!';