Abs ارجاع القيمة المطلقة
صفحة 1 من اصل 1
Abs ارجاع القيمة المطلقة
بسم الله الرحمن الرحيم
الصلاة السلام على رسول الله وعلى آله وصحبه أجمعين
Abs ارجاع القيمة المطلقة
هذه الدالة ترجع القيمة المطلقة أو القيمة الموجبة
Abs(-2.5) = 2.5
Abs(-15) = 15
Abs(7) = 7
- الكود:
procedure TForm1.btnAbs1Click(Sender: TObject);
begin
/// Returns an absolute value.
/// ارجاع القيمة المطلقة أو القيمة الموجبة
caption := FloatToStr(Abs(StrToFloat(ed1.Text)));
/// Abs(-2.5) = 2.5
/// Abs(-15) = 15
/// Abs(7) = 7
end;
ali- مبرمج مجتهد
- عدد المساهمات : 913
تاريخ التسجيل : 29/07/2013
صفحة 1 من اصل 1
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى