Bu yazımda Kare, Karekök ve Üs olaylarının nasıl olduğuna değineceğim. Gayet basittir…
Bir Sayının Karesi :
Delphi’nin bize sunduğu imkanlardan birisi, gayet basit bir işlem.
var sayi,karesi:Integer; begin //bir adet edit koyuyoruz. sayi:=StrToInt(Edit1.Text); karesi:=Sqr(sayi); ShowMessage(' Sonuç : ' + IntToStr(karesi)); end;
Yani sqr(); fonksiyonu…
Karekök :
Delphi’nin bize sunduğu imkanlardan birisi, gayet basit bir işlem.
var kok:Integer; sonuc:Real; begin //bir adet edit koyuyoruz. kok:=StrToInt(Edit1.Text); sonuc:=Sqrt(kok); ShowMessage(' Sonuç : ' + FloatToStr(sonuc)); end;
Yani sqrt(); fonksiyonu…
Üs :
Delphi’nin bize sunduğu imkanlardan bir diğeri, bu da gayet basit bir işlem.
var sayi,us,sonuc:Integer; begin //iki adet edit koyuyoruz. sayi:=StrToInt(Edit1.Text); us:=StrToInt(Edit2.Text); sonuc:=Power(sayi,us); ShowMessage(' Sonuç : ' + IntToStr(sonuc)); end;
Yani Power(); fonksiyonu…(Uses da Math olması gerekmektedir).
IntPower(); Tamsayı üs içindir, Power(); Reel sayı üs içindir…