Инициализация переменных

Pas.0001. Напишите программу, в которой инициализируются:

• переменная целого типа «n» (значение «2017»),
• переменная вещественного типа «r» (значение «3.14»),
• переменная логического типа «b» (значение «true»),
• переменная строкового типа «s» (значение «Программа на Паскале»).

Решение.

Вариант 1

program InitVars1;

var

    n : integer = 2017;
    r : real = 3.14;
    b : boolean = true;
    s : string = 'Программа на Паскале';

begin

    n := 2017;
    r := 3.14;
    b := true;
    s := 'Программа на Паскале';
  
    writeln('n = ', n);
    writeln('r = ', r);
    writeln('b = ', b);
    writeln('s = ' + s);
  
end.

Вариант 2

program InitVars2;

var

    n : integer = 2017;
    r : real = 3.14;
    b : boolean = true;
    s : string = 'Программа на Паскале';

begin
  
    writeln('n = ', n);
    writeln('r = ', r);
    writeln('b = ', b);
    writeln('s = ' + s);
  
end.

Вариант 3

program InitVars3;

const

    INIT_VALUE_OF_n = 2017;
    INIT_VALUE_OF_r = 3.14;
    INIT_VALUE_OF_b = true;
    INIT_VALUE_OF_s = 'Программа на Паскале';

var

    n : integer = INIT_VALUE_OF_n;
    r : real = INIT_VALUE_OF_r;
    b : boolean = INIT_VALUE_OF_b;
    s : string = INIT_VALUE_OF_s;

begin
  
    writeln('n = ', n);
    writeln('r = ', r);
    writeln('b = ', b);
    writeln('s = ' + s);
  
end.