Модуль: Sottoprogrammi: procedure e funzioni - 2

Задача

Dato un frammento di programma:

var x, y: intero;
sr: reale;

...
funzione Avg(a, b: intero): reale;
inizio
    Media := (a + b) / 2;
FINE;

inizio
 ...
 x := 2;
 y := 5;
 sr := Avg(x, 2 * y + 8);
 ...
fine.

Quale sarà il valore della variabile sr dopo l'esecuzione del frammento di programma?