URGENT TDI 2011 li ka ydwzou daba
Page 1 sur 2 • Partagez
Page 1 sur 2 • 1, 2
URGENT TDI 2011 li ka ydwzou daba
SVP 3awnouna f had algo 3tawou les premiére année li ka ydwzou daba
l'algo qui donne les nombre premier inférieur ou égale un entier n donné par l'utilisateur
lah ysahal 3likoum
l'algo qui donne les nombre premier inférieur ou égale un entier n donné par l'utilisateur
lah ysahal 3likoum
parazite-
- Nombre de messages : 127
Date d'inscription : 21/06/2011
Re: URGENT TDI 2011 li ka ydwzou daba
http://www.haypocalc.com/wiki/Algorithmes_pour_nombres_premiers
kingwoli-
- Nombre de messages : 2
Date d'inscription : 17/05/2010
Re: URGENT TDI 2011 li ka ydwzou daba
algorithme matrice
varibales i,j,nl,nc:entiere
variables sl,sc:reel
tableau M(0,0):tableau
debut
ecrire("donner moi le nombre de lignes ")
lire(nl)
ecrire("donner moi le nombre de colonnes ")
lire(nc)
Redim M(nl,nc)
Pour i De 0 a nl-1
Pour j De 0 a nc-1
ecrire("donner moi le element M( " ,(i+1) ,"," ,(j+1) ,")")
lire(M(i,j))
Fin Pour
Fin Pour
v<----"Oui"
Pour i De 0 a nl-1
sl=0
Pour j De 0 a nc-1
sl=sl+t[i,j]
Fin Pour
Si(sl<>0)
v<----"Non"
Fin si
Fin Pour
Pour i De 0 a nc-1
sc=0
Pour j De 0 a nl-1
sc=sc+t[i,j]
Fin Pour
Si(sc<>0)
v<----"Non"
Fin si
Fin Pour
Si v<----"Non" Alors
ecrire("no equlibre")
sinon
ecrire("equlibre")
Fin Si
fin
varibales i,j,nl,nc:entiere
variables sl,sc:reel
tableau M(0,0):tableau
debut
ecrire("donner moi le nombre de lignes ")
lire(nl)
ecrire("donner moi le nombre de colonnes ")
lire(nc)
Redim M(nl,nc)
Pour i De 0 a nl-1
Pour j De 0 a nc-1
ecrire("donner moi le element M( " ,(i+1) ,"," ,(j+1) ,")")
lire(M(i,j))
Fin Pour
Fin Pour
v<----"Oui"
Pour i De 0 a nl-1
sl=0
Pour j De 0 a nc-1
sl=sl+t[i,j]
Fin Pour
Si(sl<>0)
v<----"Non"
Fin si
Fin Pour
Pour i De 0 a nc-1
sc=0
Pour j De 0 a nl-1
sc=sc+t[i,j]
Fin Pour
Si(sc<>0)
v<----"Non"
Fin si
Fin Pour
Si v<----"Non" Alors
ecrire("no equlibre")
sinon
ecrire("equlibre")
Fin Si
fin
Mr.Ayoub- Administrateur
- Nombre de messages : 5345
Date d'inscription : 10/01/2010
Re: URGENT TDI 2011 li ka ydwzou daba
void main ()
{
int nbr;
int m=0;
printf("Veuillez entrer un nombre entier:");
scanf("%i",&nbr);
printf("Les nombres premiers sont:\n");
while(nbr>=2){
for(int i=1;i<=nbr;i++){
if(nbr%i==0){m++;}
}
if(m==2){
printf("%i\n",nbr,"Ce nombre est premier.");
}
m=0;
nbr--;
}
}
hahowa mé b langage C
ra sahél ghi y9alboh
l'algorithme
{
int nbr;
int m=0;
printf("Veuillez entrer un nombre entier:");
scanf("%i",&nbr);
printf("Les nombres premiers sont:\n");
while(nbr>=2){
for(int i=1;i<=nbr;i++){
if(nbr%i==0){m++;}
}
if(m==2){
printf("%i\n",nbr,"Ce nombre est premier.");
}
m=0;
nbr--;
}
}
hahowa mé b langage C
ra sahél ghi y9alboh
l'algorithme
Mr.Ayoub- Administrateur
- Nombre de messages : 5345
Date d'inscription : 10/01/2010
Re: URGENT TDI 2011 li ka ydwzou daba
IWA S3DTKOM N9LTO B3DA IMA ANA WALO MAIS HATA PARATIQUE NCHAALAH
souamaya.med-
- Nombre de messages : 60
Date d'inscription : 23/05/2011
Page 1 sur 2 • 1, 2
Sujets similaires
» مباراة التبريز للتعليم الثانوي في الفلسفة ( دورة 2011)-آخر أجل هو 23 مايو 2011
» إيداع الترشحيات للحصول على منحة الدراسات الأكاديمية السويسرية برسم سنة 2011. آخر أجل هو 13 ماي 2011
» تهيئ ملفات طلب منحة التعليم العالي 2011 برسم السنة الجامعية 2011-2012
» وزارة الصحة: حصة تعيين التقنيين في النقل و الاسعاف الصحي دورة 12 فبراير 2011. و ذلك يوم 07 يونيو 2011
» قطاع التعليم المدرسي: مباريات التبريز للتعليم الثانوي دورة 2011.آخر أجل حسب المباراة آخرها 2 ماي 2011
» إيداع الترشحيات للحصول على منحة الدراسات الأكاديمية السويسرية برسم سنة 2011. آخر أجل هو 13 ماي 2011
» تهيئ ملفات طلب منحة التعليم العالي 2011 برسم السنة الجامعية 2011-2012
» وزارة الصحة: حصة تعيين التقنيين في النقل و الاسعاف الصحي دورة 12 فبراير 2011. و ذلك يوم 07 يونيو 2011
» قطاع التعليم المدرسي: مباريات التبريز للتعليم الثانوي دورة 2011.آخر أجل حسب المباراة آخرها 2 ماي 2011
Page 1 sur 2
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum
Ven Nov 16, 2018 6:14 pm par tri2b
» Examen de fin de formation Théorique 2018 TDM
Mar Juin 19, 2018 8:08 pm par Mr.Ayoub
» Examen de Passage Chef Chantier TP 2010 Pratique
Lun Juin 04, 2018 11:07 am par Mr.Ayoub
» Examen de fin de formation Chef de Chantier T.P 2012 Théorique
Dim Juin 03, 2018 3:59 pm par Mr.Ayoub
» Examen de fin de formation TSGO 2016 Pratique Variante 1
Dim Juin 03, 2018 3:36 pm par Mr.Ayoub
» Examen de fin de formation Chef de Chantier T.P 2008 Théorique
Dim Juin 03, 2018 3:25 pm par Mr.Ayoub
» Examen de Passage Chef de Chantier T.P 2008 Théorique et Pratique
Dim Juin 03, 2018 3:24 pm par Mr.Ayoub
» Examen de Fin de Formation Gestion des Entreprises TSGE 2015
Mar Mai 29, 2018 12:18 pm par Mr.Ayoub
» Examen de Passage 2015 Gestion des Entreprises TSGE
Mar Mai 29, 2018 11:55 am par Mr.Ayoub
» Examen de Passage Gestion des Entreprises TSGE 2017
Mar Mai 29, 2018 11:51 am par Mr.Ayoub