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