a:=0; T:=1; while a<4 do begin T:=T+a;a=a+1;end; a/tính số vòng lặp? b/T:=? , a=? ( pascal) thanks

0 bình luận về “a:=0; T:=1; while a<4 do begin T:=T+a;a=a+1;end; a/tính số vòng lặp? b/T:=? , a=? ( pascal) thanks”

1. 1) 0<4 nên: T=1+0=1;

                  a=0+1=1;

   2) 1<4 nên: T=1+1=2;

                  a=1+1=2;

   3) 2<4 nên: T=2+2=4;

                  a=2+1=3;

   4) 3<4 nên T=4+3=7;

                 a=3+1=4;

   4=4 nên chương trình kết thúc.

   Vậy:

   a) Số vòng lặp: 4;

   b) T=7; a=4.

   Bình luận

2. a=0;  T=1;

   a=0 (đúng): T=T+a=1+0=1;   a=a+1=0+1=1    (1)

   a=1 (đúng): T=T+a=1+1=2;   a=a+1=1+1=2    (2)

   a=2 (đúng): T=T+a=2+2=4;   a=a+1=2+1=3    (3)

   a=3 (đúng): T=T+a=4+3=7;   a=a+1=3+1=4    (4)

   a=4 (sai): kết thúc

   Vậy sẽ có 4 vòng lặp và T=7;  a=4

   *Đảo câu lệnh: begin a:=a+1;  T:=T+a;  end;

   a=0;  T=1;

   a=0 (đúng): a=a+1=0+1=1;   T=T+a=1+1=2;    (1)

   a=1 (đúng): a=a+1=1+1=2;    T=T+a=2+2=4;    (2)

   a=2 (đúng): a=a+1=2+1=3;    T=T+a=4+3=7;     (3)

   a=3 (đúng): a=a+1=3+1=4;    T=T+a=7+4=11;    (4)

   a=4 (sai): kết thúc

   Vậy có 4 vòng lặp, T=11; a=4

   Bình luận