E hãy cho biết điều kiện và câu lệnh lặp kết quả in ra màn hình tổng S của vòng lặp while-..do-..(0->10)

0 bình luận về “E hãy cho biết điều kiện và câu lệnh lặp kết quả in ra màn hình tổng S của vòng lặp while-..do-..(0->10)”

1. Điều kiện: while i<=10 do

   Câu lệnh để lặp: 

   begin

          s:=s+i;

          i:=i+1;

   end;

   *Chương trình

   program tinh_S;

   uses crt;

   var s,i:byte;

   begin

          clrscr;

          i:=0;  s:=0;

          while i<=10 do

                 begin

                        s:=s+i;

                        i:=i+1;

                 end;

          write(‘S= ‘,s);

          readln;

   end.

   Bình luận

2. Điều kiện: (i<10)

   Câu lệnh lặp: while (i<10) do begin inc(i); s:=s+i; end;

   Chương trình đầy đủ:

   uses crt;
   var i,s:byte;
   begin
   clrscr;
      i:=0; s:=0;
      while(i<10)do begin inc(i); s:=s+i; end;
      writeln(‘S= ‘,s);
   readln
   end.

   Bình luận