program VariablesAssignment;

var
a, b, c: Integer;

begin
a := 4 * 4; // в переменную a будет сохранено значение квадрата числа 4
b := Abs(-11); // в переменную b будет сохранено значение модуля числа -11
c := a; // переменной c будет присвоено значение переменной a
end.