الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

طلب عاجل وبسيط

مغلق
بدأه a500 في 25 أبريل 2005 · 2 رد · 508 مشاهدة · في لغة Delphi
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمة الله وبركاته

الأخوة الأكارم تحية طيبة واحتراما ......

أريد بعض الاكواد البسيطة للآتي :

- كود لترتيب الارقام من الصغير الى الكبير

- كود لرتيب الحروف

- كود لعد عدد الاحرف فى جملة ما

- كود لحساب عدد الاحرف وعدد الارقام لجملة تحتوى على مجموعة من الاحرف والارقام

ولكم جزيل الشكر

#2

السلام عليكم

لفت نظري العنوان (مع أني عادة لا أدخل إلى المواضيع التي عنوانها غير واضح) على كل حال لماذا يتصور البعض أنهم على عجلة دائما و مواضيعهم على درجة كبيرة من الأهمية و أن الأعضاء هنا لا عمل لهم سوى الرد على استفساراتهم أنا لست ضد الأسئلة و لكن ضد طبيعة الأسئلة:

عندما ترى أن الطلب بسيط لماذا لا تقوم به بنفسك أو على الأقل أن تحاول وعندما يستعصي عليك شيء و تذكره بشكل محدد أنا لا أشك أن هناك شخص هنا يستطيع المساعدة و لن يساعد و لكن من المفترض أن تبرز روح التعاون بأننا معا نقوم بحل المشكلة و ليس بأن شخص يعتمد اعتمادا كليا على آخر.

بعد إطلاعي على الأسئلة أرى أنها من أساسيات البرمجة ولن تستطيع إطلاق لقب مبرمج على نفسك إذا كنت لا تعرفها أما إذا كنت مبتدأ أو طالب فلا بأس و في هذه الحالة من الأفضل أن تطالع الكتب المتخصصة بالخوارزميات لإغناء معلوماتك و لديك هنا على هذا الرابط كتاب غني جدا جدا جدا كان الأخ رومانوف قد أضافه إلى المنتدى أنصحك بمطالعة الفصل الرابع و الخامس و سوف تجد الجواب عن استفساراتك هناك إن شاء الله.

/index.php?showtopic=63128

أخوك الداعي لك بالتوفيق

عامر

الشام الله حاميها...

أنا الدمشقيُّ.. لو شرحتمُ جسدي

لسـالَ منهُ عناقيـدٌ.. وتفـّاحُ

و لو فتحـتُم شراييني بمديتكـم

سمعتمُ في دمي أصواتَ من راحوا

مآذنُ الشّـامِ تبكـي إذ تعانقـني

و للمـآذنِ.. كالأشجارِ.. أرواحُ

#3

هذا الكلام صحيح وأنا أويده فعلينا المحاولة أولاً ثم السؤال وأن لا يكون السؤال بطلب العجلة وعلى كل حال هذه الخوارزمية لترتيب الأعداد وتعرف باسم خوارزمية الترتيب الفقاعي

BubleSort

وهي أبسط خوارزمية ترتيب وهناك خوارزميات أخرى ترتب بشكل أسرع لكنها أكثر تعقيداً

Begin
For I:=2 to n do
  begin
  For j:=n downto I do
  if a[ j-1 ]>a[ j ] then
       Begin
       x:=a[ j-1 ];
       a[ j-1 ]:=a[ j ];
       a[ j ]:=x;
       end;
  end;
end;

تم تعديل هذه المشاركة بواسطة Mahmoud Sh7 في 26 أبريل 2005 في 00:45

هي طب للقلوب *** ذكرها يمحو الذنوب *** نورها سر الغيوب *** لاإله إلاالله

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…