:=1; b: =1; while a+b<8 do
begin
:=+1; b:=b+2 end;
:
) 0
) 2
) 3
)
23. s i :
s:=0; i:=5; while i>=0 do
begin
s:=s+1; i:=i-1; end;
) s = 0, i = -1
) s = 5, i = 0
) s = 15, i = 5 r)
s = 15, i = 0
24. , 12345.
):=0; i:=1; while i<=5 do i:=i+1; p:=p*i; ) : =1; i : =1; while i<6 do i:=i+1; p:=p * i; ) : =1; i : =1; while i<6 do begin p:=p*i; i:=i+1 end;
) :=1; i:=1; while i>5 do begin p:=p*i; i:=i+1 end;