giả sử S là tổng của n số tự nhiên đầu tiên dùng câu lệnh lặp while..do. Viết chương trình xác định n bằng bao nhiêu để S nhỏ nhất lớn hơn 300

0 bình luận về “giả sử S là tổng của n số tự nhiên đầu tiên dùng câu lệnh lặp while..do. Viết chương trình xác định n bằng bao nhiêu để S nhỏ nhất lớn hơn 300”

1. program tinh_tong;

   uses crt;

   var s,n:integer;

   begin

          clrscr;

          s:=0;  n:=0;

          while s<=300 do

                 begin

                        n:=n+1;

                        S:=S+n;

                 end;

          write(‘S= ‘,s,’ va khi do n= ‘,n);

          readln;

   end.

   Bình luận

2. Xin câu trả lời hay nhất ạ

   Program xacdinhn;

   Uses crt;

   Var s,n:integer;

   begin

   clrscr;

   s:=0;

   n:=0;

   while s<=300 do

   begin

   n:=n+1;

   S:=S+n;

   end;

   write(‘S= ‘,s,’ va khi do n= ‘,n);

   readln

   end.

   Bình luận