Вниз
Скачать: CL | DM;

Квадрат числа   Найти похожие ветки 

← →
Yanis   (2003-04-21 15:35) [0]

Немогу понять в чем дело возвожу число в квадрат и если число длинное, символов так 10, то происходит исключение и меня выкидывает в отладку.
Как возвести большое число в квадрат?


← →
REA ©   (2003-04-21 15:38) [1]

Целое число? Чему результат присваиваешь? Как возводишь?
Вероятно переполнение происходит.
Int64 можно попробовать применить.


← →
Yanis   (2003-04-21 16:08) [2]

procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
begin
Label1.Caption:=IntToStr(Sqr(StrToInt(edit1.Text)));
end;
Число вводится целое.
Кстати как возвести дробное число в квадрат и вообще в любую другую степень.


← →
AndrewXXX   (2003-04-21 16:23) [3]

Любое число можно возвести в квадрат так: x*x.
Любое число в любую степень: exp(n*ln(x)). x - число, n - степень, только х должно быть положительным.
А ошибка действительно скорее всего вылезает из-за переполнения, тем более если integer используется.


← →
Anatoly Podgoretsky ©   (2003-04-21 16:31) [4]

Почему используешь IntToStr для Sqr, у него же результат Ectended?


← →
Yanis ©   (2003-04-21 16:36) [5]

Anatoly Podgoretsky я с математическими функциями Delphi пока плохо знаком, только начал использовать математические алгоритмы.
Может научишь как и где использовать Sqr.


← →
REA ©   (2003-04-21 17:26) [6]

function Sqr(X: Extended): Extended;
function Sqr(X: Integer): Integer;

А кстати был прикол в том, что SQR не работало (или выдавало неверный результат), а X*X работало. Возможно это и из области мистики, но мне кажется я такое видел (какая плата и т.п. уже не помню).


← →
Anatoly Podgoretsky ©   (2003-04-21 17:35) [7]

REA © (21.04.03 17:26)
Это появилось в Д6, до этого не было.
Второе результат в этом случае Integer, что означает максимум 2^9


← →
Shirson ©   (2003-04-22 09:41) [8]

Есть функция Power - любую базу возводит в любую степень. Результат, понятное дело, Extended.


← →
tv ©   (2003-04-22 12:16) [9]

А есть IntPower тоже что и Power, только там степень - любое число, а тут - только целое



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.009 c
1-12788
DjVirus
2003-04-22 11:14
2003.05.05
ProgressBar при копировании


14-12882
Вадим
2003-04-17 03:32
2003.05.05
Интерпретатор


6-12851
ws
2003-03-11 16:42
2003.05.05
Помогите с сокетами...


14-12910
VRG
2003-04-17 15:13
2003.05.05
Проекту VRG требуются разработчики на некоммерческой основе


14-12898
alex134
2003-04-10 22:26
2003.05.05
Отладка




   Наверх