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.

 

  • 6(d)
    (s=0 i=1; s=1 i=2; s=3 i=3:s=6 i=4)



See also: