diff --git a/Unit1.cpp b/Unit1.cpp
index 10f5787..7b88aa7 100644
--- a/Unit1.cpp
+++ b/Unit1.cpp
@@ -18,7 +18,7 @@ void __fastcall TForm1::Button1Click(TObject *Sender)
 {
 	int upper;
 	int i;
-	int sum=0;
+	long long sum=0;
 
 	upper = StrToInt(Edit1->Text);