Задание

Определите, что будет на­пе­ча­та­но в ре­зуль­та­те работы сле­ду­ю­ще­го фрагмента программы:
var k, s: integer;
begin
s:=5;
k:=0;
while k < 15 do begin
k:=k+2;
s:=s+k;
end;
write\(s\);
end.