Переменные
Перед вами фрагмент программы. Какие (или какая) из переменных — глобальные?

function f(n: longint): longint;

var
s, t, v: longint;
begin
f := n + 1;
end;

var
a: longint;

begin
a := f(3);
end.

Сейчас похоже нет глобальных переменных.

Если сделать вот так

var

a: longint;

function f(n: longint): longint;

var

s, t, v: longint;

begin

f := n + 1;

end;

begin

a := f(3);

end.

то а будет глобальной

Объяснение: