Chương trình thực hiện bao nhiêu vòng lặp, S=?, Viết Pascal B1 S:=1, i:=1 B2 i>5, chuyển B4 B3 S := S+i, i:= i+2 và quay lại B2 B4 thông báo giá trị v

0 bình luận về “Chương trình thực hiện bao nhiêu vòng lặp, S=?, Viết Pascal B1 S:=1, i:=1 B2 i>5, chuyển B4 B3 S := S+i, i:= i+2 và quay lại B2 B4 thông báo giá trị v”

1. Thực hiện 3 vòng lặp.

   `S=10`

   `i=1→i<5→` $\begin{cases}S=1+1=2\\i=1+2=3\end{cases}$

   `i=3→i<5→` $\begin{cases}S=2+3=5\\i=3+2=5\end{cases}$

   `i=5→i=5→` $\begin{cases}S=5+5=10\\i=5+2=7\end{cases}$

   `i=7→i>5→` Kết thúc vòng lặp.

   ___________________________________________

   VCT:

   program phuongt;
   uses crt;
     var i, s: integer;
   begin
          clrscr;
          s:=1; i:=1;
          while i<=5 do
          begin
                  s:=s+i;
                  i:=i+2;
          end;
          write(‘Gia tri s = ‘, s);
          readln
   end.

   Bình luận

2. Số vòng lặp:

   -Vòng (1): 1<5 nên: S=1+1=2;

                                 i=1+2=3;

   -Vòng (2): 3<5 nên: S=2+3=5;

                                 i=3+2=5;

   -Vòng (3): 5=5 nên: S=5+5=10;

                                 i=5+2=7;

   7>5 nên chương trình kết thúc.

   ⇒ Chương trình thực hiện 3 vòng lặp;

       S=10.

   Viết chương trình:

   program BT;

   uses crt;

   var i,S: byte;

   Begin

            clrscr;

            S:=1; i:=1;

            while i<=5 do

            begin

                     S:=S+i;

                     i:=i+2;

            end;

            write(‘S = ‘,S,’ ,  i = ‘,i);

            readln

   End

   Bình luận