15. Определите
результат выполнения программы:


var
i, sum: integer;

begin

 

sum:= 0;


  i:= 1;

 
while i<=3 do

  
 begin
sum:=sum+i;

  i:=i+1;

  
   end;


writeln (sum);


end.

 


A) 1;        

B) 7;      

C) 9;       

D) 6.