(Запишите верный ответ)Обусловьте значение переменной s в итоге исполнения

(Запишите верный ответ)
Обусловьте значение переменной s в результате исполненья куска программки:
function fn( k:integer):real;
var i, x:integer;
begin
x:=0;
for i:=1 to k do x:=x+i;
fn:=x;
end;
begin
m:=4;
s:=fn(m);
end;