|
في حال وجود أي مواضيع أو ردود مُخالفة من قبل الأعضاء، يُرجى الإبلاغ عنها فورًا باستخدام أيقونة ( تقرير عن مشاركة سيئة )، و الموجودة أسفل كل مشاركة .
آخر المواضيع |
|
ملتقى طلاب الاعلام الالي لحل تمارين Algorithmes et programmation en Pascal
|
أدوات الموضوع | انواع عرض الموضوع |
2013-05-16, 19:14 | رقم المشاركة : 466 | |||||
|
اقتباس:
https://www.ethnoinformatique.fr/mod/...ew.php?id=2793 يمكنك تحميله عادي بنسخة clic gauche enregistre sous --------------- صفحة خاصة بطلاب الاعلام الالي فيها روابط بعضها مهم والاخر غير مهم ارجوا ان تختار ما تريده انت بنفسك https://www.ethnoinformatique.fr/course/view.php?id=52
|
|||||
2013-05-16, 19:22 | رقم المشاركة : 467 | ||||
|
اقتباس:
+ حاول ان تبرمج هده التمارين بنفسك لكي تتعلم منها وتكتشف اخطاءك |
||||
2013-05-17, 15:08 | رقم المشاركة : 468 | |||
|
أرجو منك يا الخ المساعدة لأنني لم افهم التمرين |
|||
2013-05-17, 18:07 | رقم المشاركة : 469 | |||
|
ضع الترمين ونحن نساعدك ان شاء الله الترمين غير واضح ! |
|||
2013-05-19, 21:29 | رقم المشاركة : 470 | |||
|
السلام عليكم |
|||
2013-05-19, 23:26 | رقم المشاركة : 471 | |||
|
السلام عليكم |
|||
2013-05-21, 18:48 | رقم المشاركة : 472 | |||
|
بخصوص تمارين الباسكال |
|||
2013-05-21, 19:10 | رقم المشاركة : 473 | |||
|
بخصوص كود:
program liste(input,output); TYPE tpoint=^tval; tval=record valeur:integer; suivant:tpoint end; VAR prem:tpoint; {variable globale} n:integer; c:char; procedure lire; var precedent,point:tpoint; i:integer; { modifie N et PREM } begin write('combien d''éléments?'); readln(n); new(prem); write('1ère valeur ? '); readln(prem^.valeur); precedent:=prem; for i:=2 to n do begin new(point); write(i,'ième valeur ? '); readln(point^.valeur); precedent^.suivant:=point; precedent:=point end; precedent^.suivant:=NIL (* le dernier ne pointe sur rien *) end; procedure afficher; var point:tpoint; i:integer; begin point:=prem; for i:=1 to n do begin writeln(point^.valeur); point:=point^.suivant end end; procedure supprimer; var point,prec:tpoint; rep:char; begin point:=prem; repeat write(point^.valeur,' à ôter ?'); readln(rep); if rep='O' then begin n:=n-1; if point<>prem then begin prec^.suivant:=point^.suivant; dispose(point); point:=prec^.suivant (* se préparer pour la suite *) end else begin prem:=prem^.suivant; dispose(point); (* ancien premier *) point:=prem end end else begin (* pointer sur le suivant *) prec:=point; point:=point^.suivant end until point=nil end; procedure rajouter; var p1,p2,prec:tpoint; rep:char; begin p1:=prem; repeat write(p1^.valeur,' rajouter un élément avant (O/N) ? '); readln(rep); if rep='O' then begin n:=n+1; if p1<>prem then begin new(p2); write('valeur ? '); readln(p2^.valeur); prec^.suivant:=p2; p2^.suivant:=p1; prec:=p2; end else begin new(p1); write('valeur ? '); readln(p1^.valeur); p1^.suivant:=prem; prem:=p1 end end else begin (* pointer sur le suivant *) prec:=p1; p1:=p1^.suivant end until p1=nil; p1:=prec; repeat write('ajouter un élément en fin de liste (O/N) ? '); readln(rep); if rep='O' then begin n:=n+1; new(p2); write('valeur ? '); readln(p2^.valeur); p1^.suivant:=p2; p2^.suivant:=nil; p1:=p2 end until rep<>'O' end; BEGIN {prog principal} lire; repeat writeln('A:afficher, S:supprimer R:rajouter, F:fin'); write('votre choix ? '); readln(c); case c of 'A':afficher; 'S':supprimer; 'R':rajouter end until c='F' end. |
|||
2013-05-21, 20:20 | رقم المشاركة : 474 | ||||
|
اقتباس:
شكرا اخي على ردك رجاءا اريد رابط الصفحة اين اجد البرنامج الذي اشرت اليه اخي الكريم |
||||
2013-05-21, 20:45 | رقم المشاركة : 475 | ||||
|
اقتباس:
les tabnleau موجود في الرابطين السابقين مع ردود هدا الموضوع في الصفحات من 10 الى 20 تقريبا الرابطين السابقين فيهما خوارزميات تنفعك يكفي فقط ترجمتها |
||||
2013-05-21, 21:17 | رقم المشاركة : 476 | ||||
|
اقتباس:
شكرا مجددا |
||||
2013-05-25, 17:52 | رقم المشاركة : 477 | |||
|
البسملة1
Devoirs Bac TP pour Sciences d’informatique Premier devoir Le deuxième Le troisième |
|||
2013-05-25, 18:22 | رقم المشاركة : 478 | |||
|
ecrire un algo que lit la diùonsion n d'un tableaux t de type |
|||
2013-05-25, 19:28 | رقم المشاركة : 479 | ||||
|
اقتباس:
ابحث في المضوع قد تجد الردود او راجع الرابطين السابقين في هخه الصفحة ففيهما تمارين من هدا النوع شكرا |
||||
2013-05-25, 19:37 | رقم المشاركة : 480 | ||||
|
اقتباس:
بخصوص انواع التمارين فالبعض تم وضعه هنا بحمد الله والبعض كان مشابه تمرين الموضوع الثاني تم وضعه هنا ولكن الحل لم يوضع للاسف شكرا على الموضوعات |
||||
الكلمات الدلالية (Tags) |
ملتقى, الالي, الاعلام, طلاب |
|
|
المشاركات المنشورة تعبر عن وجهة نظر صاحبها فقط، ولا تُعبّر بأي شكل من الأشكال عن وجهة نظر إدارة المنتدى
المنتدى غير مسؤول عن أي إتفاق تجاري بين الأعضاء... فعلى الجميع تحمّل المسؤولية
Powered by vBulletin .Copyright آ© 2018 vBulletin Solutions, Inc