عادل علي احمد

هذي محاولتي الفاشلة في كتابة الكود procedure TForm1.Button1Click(Sender: TObject); var i,i1,i2,m1,m2,m3,loob2,loob3:Integer;a1,a2:string; dar:array of string; dd:Integer; label lable1,lable2,lable3,lable4 ; begin dd:=1; Randomize; hash:= Edit1.Text; salt:= Edi…

السلام عليكم ورحمة الله وبركاته هل يمكن انشاء معادلة تظهر جميع الاحتمالات الممكنة بدون تكرار مثال : لوحات السيارات (أ أ أ 1 1 1) الى (ج ج ج 9 9 9) ; مثال2 : المحارف المطوبة ( lsdfr6891z ) عدد الخانات مثلا 6 يكون الناتج النهائي (zzzzzz) حيث يتم ارجاع كافة الاحت…