viết chương trình tìm số N nhỏ nhất để /N<0.0005 viết chương trình tìm số N nhỏ nhất sao cho tổng S>10000 S=1+2+3+…+N in ra kết quả của S và N tìm đ

viết chương trình tìm số N nhỏ nhất để /N<0.0005 viết chương trình tìm số N nhỏ nhất sao cho tổng S>10000
S=1+2+3+…+N
in ra kết quả của S và N tìm được

0 bình luận về “viết chương trình tìm số N nhỏ nhất để /N<0.0005 viết chương trình tìm số N nhỏ nhất sao cho tổng S>10000 S=1+2+3+…+N in ra kết quả của S và N tìm đ”

  1. 1. Đề thiếu.

    2.

    uses crt;
    var S,n:integer;
    begin
       clrscr;
       S:=0; n:=1;
       while S<=10000 do
       begin
          S:=S+n;
          n:=n+1;
       end;
       writeln(‘S la: ‘,S);
       writeln(‘n la: ‘,n);
       readln
    end.

    Bình luận

Viết một bình luận