دلفي تعليم
هل تريد التفاعل مع هذه المساهمة؟ كل ما عليك هو إنشاء حساب جديد ببضع خطوات أو تسجيل الدخول للمتابعة.

برنامج يطلب عدد ثم يستخرج قواسمه الأولية

2 مشترك

اذهب الى الأسفل

برنامج يطلب عدد ثم يستخرج قواسمه الأولية Empty برنامج يطلب عدد ثم يستخرج قواسمه الأولية

مُساهمة  mah11 22/12/2014, 2:17 pm

برنامج يطلب عدد ثم يستخرج قواسمه الأولية

يستخرج قواسمه الأولية

1 --
إذا كان المطلوب هو مجموعة قواسم عدد ما

نقسم العدد على 1 , 2 , 3 .... ثم على نفسه في أخير
ونحتفظ بكل ناتج الباقي منه صفر

مثلا :
8

8 / 1 = 8
8 / 2 = 4
8 / 3 = 2 الباقي  = 2
8 / 4 = 2
8 / 5 = 1 الباقي  = 3
8 / 6 = 1 الباقي  = 2
8 / 7 = 1 الباقي  = 1
8 / 8 = 1

هذه قواسم العدد 8
8 / 1 = 8
8 / 2 = 4
8 / 4 = 2
8 / 8 = 1

Langage c

الكود:

#include<stdio.h>

void main()
{
   int k;
   printf(" Entrez un nombre : ");
   scanf("%d",&k);
   for(int i=1; i=k; i++)
     if((k%i)==0)
      printf("%d",i);
}

Langage Pascal et Delphi

program Proj;
{ pour Delphi  }
  {$APPTYPE CONSOLE}
uses
  SysUtils;
{fin}
var
    i: integer;
    k: integer;
begin
   Write(' Entrez un nombre : ');
   ReadLn (k);
   for i := 1 to k do
    if k mod i = 0 then
     WriteLn(i);
   ReadLn;
end.


mah11
Admin

عدد المساهمات : 364
تاريخ التسجيل : 21/06/2013

https://delph.forumalgerie.net

الرجوع الى أعلى الصفحة اذهب الى الأسفل

برنامج يطلب عدد ثم يستخرج قواسمه الأولية Empty رد: برنامج يطلب عدد ثم يستخرج قواسمه الأولية

مُساهمة  Admin 27/4/2015, 4:51 pm

بارك الله فيـــــــــــــــــــك

Admin
مبتدئ في البرمجة

عدد المساهمات : 47
تاريخ التسجيل : 21/03/2014

الرجوع الى أعلى الصفحة اذهب الى الأسفل

الرجوع الى أعلى الصفحة

- مواضيع مماثلة

 
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى