cho biết T= 1+2=+3-+N. Hãy viết chương trình tìm số tự nhiên N nhỏ nhất sao cho T>200

0 bình luận về “cho biết T= 1+2=+3-+N. Hãy viết chương trình tìm số tự nhiên N nhỏ nhất sao cho T>200”

1. Program tong;

   Uses crt;

   Var n , s , k: integer; 

   Begin Write(‘ Nhap N:’); 

   Readln(N ); 

   S := 0; While ( T>200 ) do 

   Begin k := N mod 0; 

   N := N div 200; 

   End;

   Writeln( ‘số tự nhiên N nhỏ nhất ’,N,’ la :’, N); 

   Readln;

   End.

   Bình luận

2. Program BTH;
   Uses crt;
   Var n,t:longint;
   Begin
           clrscr;
           t:=0;
           Repeat
                   n:=n+1;
                   t:=t+n;
           Until t>200;
           Write(n,’ la so tu nhien nho nhat de t>200′);
           readln;
   end.

   Bình luận