program TinhTong;
var
   n, tong: integer;
begin
   n := 1;
   tong := 0;
   while tong <= 2000 do
   begin
      tong := tong + n;
      n := n + 1;
   end;
   writeln('Gia tri nho nhat cua n sao cho tong > 2000 la: ', n-1);
end.