Определите значение переменной y, которое будет получено в результате выполнения следующей программы:
var y : real; i : integer;
begin
y := 0;
i := 5;
while i>2 do
begin
i:=i − 1;
y := y + i * i
end;
end.