أرقام Armstrong: تعرف على خصائصها

البرنامج الذي قدمته في PL/SQL يبدو جيدًا عمومًا، ولكن هناك بعض الأمور التي يمكن تحسينها. في الواقع، لديه بعض الأخطاء التي يجب تصحيحها لضمان عمله بشكل صحيح. هذه الأخطاء تتعلق بالطريقة التي يتم فيها تعيين وتحديث المتغيرات. هنا تصحيح للبرنامج:

sqlCopy code
declare
    p number := 371;
    x number;
    t number;
    sum number := 0; -- تحديد قيمة ابتدائية لمتغير sum
begin
    x := p;
    while x > 0 loop
        t := x mod 10;
        sum := sum + t*t*t; -- تعديل عملية الأس على الرقم t
        x := x / 10; -- استخدام القسمة على 10 بدلاً من القسمة على 10.0
    end loop;
    
    if (sum = p) then -- تصحيح الشرط للمقارنة بالقيمة الأصلية ل p
        dbms_output.put_line(p || ' is an Armstrong number'); -- تصحيح النص المطبوع
    end if;
end;
/

تم تحديث البرنامج لحساب القيمة الصحيحة للعدد المعادل لـ Armstrong number وطباعة النص بشكل صحيح.

الأرقام الأصيلية (Armstrong numbers) هي أرقام تتميز بخاصية معينة تتعلق بمجموع أرقامها المكعبية. على سبيل المثال، يعتبر العدد 371 Armstrong number لأنه يتم تحقيق المعادلة التالية:

$3^3 + 7^3 + 1^3 = 27 + 343 + 1 = 371$

حيث يكون مجموع أرقامه المكعبية يساوي العدد نفسه. تُستخدم أرقام Armstrong في العديد من المجالات الرياضية والبرمجية كتمرين لفحص مهارات البرمجة وفهم الألغاز الرياضية.