أيـن الخطأ ؟

[~ فآيـزة ~]

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

هذا برنامج يطلب عدد مرات ظهور عدد في جدول احادي


http://im80.gulfup.com/xGjf6N.bmp

لكـــن
إذا أردت تنفيذ البرنامج هنا يتوقف ويحدث blocage :
http://im53.gulfup.com/LF1Xmi.bmp

لم أفهم أيـن المشكلة؟؟؟! :mad:

الرجاء المساعدة جزاكم الله خيرا

[-asma-]

السلام عليكم ورحمة الله تعالى وبركاته
أختي المشكلة في البرنامج تاعك انك بعد ما تدخلي الرقم اللي حابة تعرفي (مثلا 2)قداه مرة متعاود في الجدول، شارطة عليه انه اذا لقى الرقم الأول 2 يزيد في i وكان لا يقعد يعاود، وهو لازم يزيد في ال i في الحالتين يعني لازم تخرجي i:=i+1; خارج الشرط

وانا درتلك برنامج يعمل نفس الشي

program exo1;
uses wincrt;
type tab= array[1..20] of integer;
var n,val,s,i:integer;
T:tab;
begin
writeln('entrez la taille de tableau: ');
readln(n);
//pour confirmer que l'utilisateur est donnée un nombre entre 1 et 20
while ((n<1) or (n>=20)) do
begin
writeln('n doit etre superieurs a 0 et inferieur a21');
readln(n);
end;
//pour remplissage de tableau:
for i:=1 to n do
begin
writeln('entrez l entier numero: ',i);
readln(T[i]);
end;
// pour l'affichage des éléments de tableau:
for i:=1 to n do
begin
writeln(T[i]);
end;
//pour lire valeur à compté:
writeln('entrez la valeur a compter: ');
readln(val);
s:=0;
//pour compter le nombre d'existance de la valeur donnée:
for i:=1 to n do
if(T[i]=val) then s:=s+1;
// pour affiche la résultat:
if(s=0) then
writeln('le nombre: ',val,'n existe pas dans le tableau')
else
writeln('le nombre: ',val,'existe: ',s,'fois');
end.
مي أختي كون عملتيه ب les procedures خير
ربي يوفقك أختي...
في أمان الله ...

[~ فآيـزة ~]

السلام عليكم ورحمة الله تعالى وبركاته
أختي المشكلة في البرنامج تاعك انك بعد ما تدخلي الرقم اللي حابة تعرفي (مثلا 2)قداه مرة متعاود في الجدول، شارطة عليه انه اذا لقى الرقم الأول 2 يزيد في i وكان لا يقعد يعاود، وهو لازم يزيد في ال i في الحالتين يعني لازم تخرجي i:=i+1; خارج الشرط

وانا درتلك برنامج يعمل نفس الشي

program exo1;
uses wincrt;
type tab= array[1..20] of integer;
var n,val,s,i:integer;
T:tab;
begin
writeln('entrez la taille de tableau: ');
readln(n);
//pour confirmer que l'utilisateur est donnée un nombre entre 1 et 20
while ((n<1) or (n>=20)) do
begin
writeln('n doit etre superieurs a 0 et inferieur a21');
readln(n);
end;
//pour remplissage de tableau:
for i:=1 to n do
begin
writeln('entrez l entier numero: ',i);
readln(T[i]);
end;
// pour l'affichage des éléments de tableau:
for i:=1 to n do
begin
writeln(T[i]);
end;
//pour lire valeur à compté:
writeln('entrez la valeur a compter: ');
readln(val);
s:=0;
//pour compter le nombre d'existance de la valeur donnée:
for i:=1 to n do
if(T[i]=val) then s:=s+1;
// pour affiche la résultat:
if(s=0) then
writeln('le nombre: ',val,'n existe pas dans le tableau')
else
writeln('le nombre: ',val,'existe: ',s,'fois');
end.
مي أختي كون عملتيه ب les procedures خير
ربي يوفقك أختي...
في أمان الله ...
وعليكم السلام ورحمة الله وبركاته

صح كان هذا خطئي فعلا

شكرا اختي ربي يحفظك

les procedure مازال ماقريناش عليهم


بارك الله فيك

[-asma-]

السلام عليكم
أختي لا شكر على واجب، أرجو أن تكوني قد استفدتي
في أمان الله وربي يوفقك

[~ فآيـزة ~]

السلام عليكم
أختي لا شكر على واجب، أرجو أن تكوني قد استفدتي
في أمان الله وربي يوفقك
وعليكم السلام
بارك الله فيك

اختي، في l’exécution تاع les matrices كيفاه ندخل les colonnes et les lignes وكيفاه نكمل من بعد

اسمحيلي على الاسئلة التافهة بصح راني غبت بزاااف " لظروف" كي بدينا لي ماتريس ولهذا ماراني فاهمة وااااااالو والله كارثة

فقط هذا البرنامج : ماقدرتش نعرف ادا كان صحيح ولا غالط لاني اصلا لم اعرف كيف انفذه

البرنامج فيه النقاط تاع الطلبة في مختلف المواد حيث: les lignes يمثلوا لي نوط تاع كل طالب وles colonnes يمثلوا الموااد ، يطلب حساب معدل كل طالب ومبعد معدل كل مادة ومبعد معدل القسم ككل وعرضه ..

راني علابالي غالط 100% بل وكارثة :

http://im88.gulfup.com/CHfku9.bmp

واسمحيلي كثرت عليك

[-asma-]

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

[~ فآيـزة ~]

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

حسنا، ربي يجازيك اختي راني في امس الحاجة للمساعدة

[-asma-]

السلام عليكم ورحمة الله تعالى وبركاته
بسم الله الرحمن الرحيم
في البداية كيف احوالك؟ إن شاء الله بخير
pour les matrice le type de donnée est unique (c-à-d une seule type)
* par exemple:
- une matrice d'entiers
- une matrice de caractères
- une matrice de réels ... etc

et la déclaration d'une matrice d'entiers par exemple en PASCAL est comme ça:
const n=4;m=5;//n:le nombre de lignes, m:le nombre de colonnes
Type mat=array[1..n,1..m]of integer;
var t:tab; i,j:integer;
le programme suivant permet d'inserer les valeurs d'une matrice (4*3) et puis les affichées
program exemple;
const n=4;m=3;
type mat=array[1..n,1..m] of integer;
var t:mat; i,j:integer;
Begin
//L'insertion:
for i:= 1 to n do
for j:=1 to m do
begin
writeln('entrez un entier:');
read(t[i,j]);
end;
//L'affichage:
for i:= 1 to n do
for j:=1 to m do
writeln('T[',i,',',j,']= ',T[i,j]);
end.
mais la gestion des notes des étudiants ne peut pas la représenter par une matrice puisque
la matrice contient seulement des élements de meme type
et la gestion des notes des étudiants contient les notes(de type réel),
les module et les noms d'etudiants(de type string)
mais elle est possible avec les enregistrements
قوليلي قريتوا les enregistrements
ولا لا؟
في انتظار إجابتك
في أمان الله...

[~ فآيـزة ~]

السلام عليكم ورحمة الله تعالى وبركاته
بسم الله الرحمن الرحيم
في البداية كيف احوالك؟ إن شاء الله بخير
pour les matrice le type de donnée est unique (c-à-d une seule type)
* par exemple:
- une matrice d'entiers
- une matrice de caractères
- une matrice de réels ... etc

et la déclaration d'une matrice d'entiers par exemple en PASCAL est comme ça:
const n=4;m=5;//n:le nombre de lignes, m:le nombre de colonnes
Type mat=array[1..n,1..m]of integer;
var t:tab; i,j:integer;
le programme suivant permet d'inserer les valeurs d'une matrice (4*3) et puis les affichées
program exemple;
const n=4;m=3;
type mat=array[1..n,1..m] of integer;
var t:mat; i,j:integer;
Begin
//L'insertion:
for i:= 1 to n do
for j:=1 to m do
begin
writeln('entrez un entier:');
read(t[i,j]);
end;
//L'affichage:
for i:= 1 to n do
for j:=1 to m do
writeln('T[',i,',',j,']= ',T[i,j]);
end.
mais la gestion des notes des étudiants ne peut pas la représenter par une matrice puisque
la matrice contient seulement des élements de meme type
et la gestion des notes des étudiants contient les notes(de type réel),
les module et les noms d'etudiants(de type string)
mais elle est possible avec les enregistrements
قوليلي قريتوا les enregistrements
ولا لا؟
في انتظار إجابتك
في أمان الله...
وعليكم السلام ورحمة الله وبركاته
الحمد لله بخير ،و اتمنى ان تكوني كذلك :)

فقط سؤال في la partie de déclaration : كي نحددوا المجال تاع les lignes مثلا من 1 إلى n ، هل القيم اللي ندخلوهم تاني لازم يكونوا محصورين بين 1 و n؟.. ولا هادا le nombre des éléments برك ؟

في ما يخص هدا البرنامج : الطلبة والمواد مش داخلة في la matrice يعني مش داخلين في الحسابات .. هو فقط مثال عطاتهولنا الاستاذة باه نحسبوا معدل في une matrice ، والطلبة نرمزولهم برك ب i1,i2,i3...... de type entier .. + الزملاء تاعي كامل صلحلهم البرنامج .. يعني هو ممكن

les enregistrements ما قريناهمش

بارك الله فيك :)

[-asma-]

السلام عليكم ورحمة الله تعالى وبركاته
أنا الحمد لله الذي لا يحمد على مكروه سواه
في البداية n هو عدد الأسطر و m هو عدد الأعمدة يعني هذه القيم لا دخل لها بقيم الخانات
فكيف إذا يمكن تشكيل ماتريس من الحروف والأعداد الحقيقية والكلمات والتي تختلف عن قيم n و m التي هي أعداد طبيعية
أما بالنسبة للبرنامج فسأقوم ببرمجته وتجربته كما طلبتي وسأضعه في رد آخر بإذن الله...
بالتوفيق...
في أمان الله...