Программирование на языке Delphi/§1

Первая программа

Мы будем создавать консольную программу. Запустите Delphi, затем с помощью команды File->New->Other->Console Application создайте новый проект.

 
program Project1; 

{$APPTYPE CONSOLE}

uses SysUtils;

begin
  writeln('Hello World');
end.

Эта программа выводит на экран сообщение "Hello World". Разберем ее построчно:

```
 program Project1;
```
-- program - ключевое слово с которого начинается программа. Оно не является обязательным. Project1 - название нашей программы.
```
{$APPTYPE CONSOLE}
```
-- Директива компилятора; при ее выполнении компилятор создает консольную программу. Если данная директива отсутствует, то мы не сможем использовать некоторые процедуры(например writeln) для ввода или вывода.
```
 uses SysUtils;
```
-- Зарезервированное слово uses подключает к программе модуль(в нашем случае SysUtils).
```
begin
```
-- Зарезервированное слово. Оно означает начало программы или подпрограммы.
```
writeln('Hello World');
```
-- Это функция вывода сообщений на экран(в нашем случае "Hello World"). Существует также функция write. Различия между write и writeln минимальные: writeln переводит курсор на следующую строку.
```
end.
```
-- Завершение программы или модуля. В случае завершения подпрограммы вместо точки ставится точка с запятой.

Вторая программа. Ввод текста с клавиатуры и вывод его на экран

 
program Project1; 

{$APPTYPE CONSOLE}

uses SysUtils;

var
  s:string; //Мы объявляем строковую переменную s
begin
  readln(s); //Считываем ее
  writeln(s); //И выводим на экран
  readln;  // Чтобы программа сразу не завершалась
end.

```
var s:string;
```
-- Объявляем строковую переменную (string). Сначала мы выбираем индетификатор(название) переменной - он может состоять из латинских букв, арабских цифр и символа подчеркивания(имя переменной должно начинаться с латинской буквы); затем мы указываем тип переменной.
```
readln(s);
```
-- Функция readln считывает сообщение с клавиатуры до тех пор, пока не будет нажата клавиша Enter.