اقتباس:
المشاركة الأصلية كتبت بواسطة خليل صلاح
ساكتب الalgorithme للبرنامج و انت حولها للغة البرمجة التي تريد.
كود:
algorithme premier;
var t:tableau[1..100,1..100] de reél;
x,j,s,k,n,m,i:entier;
début
lire (n,m);
pour i:=1 à n faire
pour j:=1 à n faire lire(t[i,j]);
s:=0;
pour i:=1 à n faire
pour j:=1 à n faire{
x:=0;
k:=2;
tant que (k<=t[i,j]div2) et (x=0 ) faire
{
si(t[i,j] mod k=0) alors x:=1;
k:=k+1;
}
si x=1 alors s:=s+1;
}
ecrire(s);
fin.
|
ممكن ألغوريتم أخر منفضلك لانو هذامحبش يمشيلي
و شكرااااااااااااااااااااااااااااا