delphi4arab منتديات دلفي للعرب
اختبار فقط - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : دلفي للعرب - القسم العام (https://delphi4arab.net/forum/forumdisplay.php?fid=10)
+--- الموضوع : اختبار فقط (/showthread.php?tid=10791)



اختبار فقط - Delphi4Us - 22-04-2020

هناك مثال اجرته شركة برمجيات نريد ان نحسبه ذهنياً فقط .

بلغة جافا سكريبت

كود :
1 function find_max(nums) { 2 let max_num = Number.NEGATIVE_INFINITY; // smaller than all other numbers 3 for (let num of nums) { 4 if (num > max_num) { 5 // (Fill in the missing line here) 6 } 7 } 8 return max_num; 9 }

بلغة بايثون

كود :
1 def find_max(nums): 2 max_num = float("-inf") # smaller than all other numbers 3 for num in nums: 4 if num > max_num: 5  # (Fill in the missing line here) 6 return max_num


بلغة سي
كود :
nt find_max(int nums[], int len) 2 { 3 int i, max_num = nums[0]; 4 for (i = 1; i < len; i ++) 5 if (nums[i] > max_num) 6 // (Fill in the missing line here) 7 return max_num; 8 }

لم يكن هناك مثال بالدلفي ولكني وضعت مثالا

كود :
function TForm1.find_max(nums: array of integer; len: integer): integer; var i, max_num : integer ; begin i:= nums[0]; max_num:= nums[0]; while i < len do begin if (nums[i] > max_num) then Result:=   max_num; i:=i+1; end;

مع العلم لم افهم ماذا يقصدون باملاء السطر الناقص هنا ولكن اعتقد ان الاجابة هي الاولى
هل يمكنك الاجابة على السؤال من الخيارات التالية بدون استخدام اي برنامج وانما بالتفكير فقط:

num = max_num
max_num += 1
max_num = num
max_num += num


RE: اختبار فقط - merouane - 22-04-2020

كود :
function find_max(nums: array of integer): integer; var   i, max_num: integer; begin   max_num := nums[0];   for i := 0 to length(nums)-1 do     if (nums[i] > max_num) then       max_num := nums[i];  // السطر الناقص   result := max_num; end;

الإجابة هي (إذا كانت القيمة الحالية من الجدول أكبر من القيمة max_num الحالية =>max_num يأخذ قيمة num الحالية)
max_num = num


RE: اختبار فقط - Delphi4Us - 23-04-2020

اها يعني الاجابة هي ماهو السطر الناقص وليس ماهي نتيجة الاجراء


RE: اختبار فقط - ghostdz - 23-04-2020

السطر الناقص على ما أعتقد هو 
max_num := nums[i]


RE: اختبار فقط - merouane - 03-05-2020

(23-04-2020, 02:31 PM)ghostdz كتب : السطر الناقص على ما أعتقد هو 
max_num := nums[i]

 الإجابة في الأصل تتبع السؤال الذي حدد الخيارات
وليس بلغة باسكال/دلفي - والإجراء الذي كتبته أنا هو ليفهم الجميع الخوارزمية.