|
في حال وجود أي مواضيع أو ردود مُخالفة من قبل الأعضاء، يُرجى الإبلاغ عنها فورًا باستخدام أيقونة ( تقرير عن مشاركة سيئة )، و الموجودة أسفل كل مشاركة .
آخر المواضيع |
|
ملتقى طلاب الاعلام الالي لحل تمارين Algorithmes et programmation en Pascal
|
أدوات الموضوع | انواع عرض الموضوع |
2013-02-13, 22:38 | رقم المشاركة : 271 | |||||
|
اقتباس:
كود:
program ee; uses wincrt; var lettre :array['A'..'Z'] of integer; ch:string; i:char; j:integer; begin repeat writeln('saisir une chaine'); readln(ch); until ch<>''; for i:='A' to 'Z' do for j:=1 to length(ch) do if upcase(ch[j])=i then lettre[i]:=lettre[i]+1; for i := 'A' to 'Z' do if lettre[i]<>0 then writeln(i, ' pour ',lettre[i],' fois'); end.
|
|||||
2013-02-14, 09:47 | رقم المشاركة : 272 | |||
|
ااااااااااااااااااااااااشكرااااااااااااااااااااا
|
|||
2013-02-14, 13:55 | رقم المشاركة : 273 | ||||
|
اقتباس:
البرنامج سهل وبسيط برمج*-*يه*-*بنفسك |
||||
2013-02-14, 17:44 | رقم المشاركة : 274 | |||
|
ارجوا من الطلبة ان يضعوا امتحانات الاعلام الاي لمحاولة حلها |
|||
2013-02-22, 12:17 | رقم المشاركة : 275 | |||
|
نحطو كل caractère في خانة في جدول |
|||
2013-02-22, 12:26 | رقم المشاركة : 276 | |||
|
السلام عليكم ،،، من فضلكم أريد برنامج باسكال لحساب أعداد كيث المكونة من 3 أٍقام |
|||
2013-02-22, 14:10 | رقم المشاركة : 277 | |||
|
|
|||
2013-02-22, 18:01 | رقم المشاركة : 278 | ||||
|
اقتباس:
اولا نقوم بقراءة عدد مكون من ثلاث ارقام مثلا 145 الان يلزمنا عزل الارقام عن بعضها البعض 1 4 5 من اجل هدا نستعمل المبدا التالي كود:
n mod 10 ex 145 mod 10=5 n:= n div 10 n:=14 14 mod 10 :=4 n:= n div 10 :=1 1 mod 10:=1 هك>ا نكون قد عزلنا الارقام 1 4 5 الان ندخل الى الدالة كود:
entreé trois chiffres sortie seroa la somme des trois chiffres par suite le 2 ieme chiffre prendre la place de 1 ier chifre le 3ieme chiffre prendre la place de 2ieme chiffres la somme prendre la place de troisieme chiffres ex 145 premiere chiffres 1 2ieme 4 3ieme 5 la somme 10 2ieme iteration 1 iere chiffre :=4 2 ieme chiffre :=5 3ieme chiffres :=10 on fait la somme 4+5+10:=19 ensi de suite ارجوا ان يقوم بعض الطلبة ببرمجته لانني فقدت برنامج الباسكال من الحاسوب وعلي تثبيته بعد البحث عن نسخة فعالة وملائمة لنظام الوندوز شكرا لك |
||||
2013-02-22, 18:08 | رقم المشاركة : 279 | ||||
|
اقتباس:
الرد موجود في الرد الاول من الصفحة19 والرد رقم 240 في الصفحة 16 *-* تمرين مشابه له تقريبا*-* |
||||
2013-02-22, 18:09 | رقم المشاركة : 280 | ||||
|
اقتباس:
امين بارك الله فيك وجزاك خيرا |
||||
2013-02-22, 20:29 | رقم المشاركة : 281 | |||
|
كود:
program ex; uses wincrt; type tableau=array[0..100]of integer; var n,n1,m,m1,i:integer; s:tableau; begin writeln('Entrez un nombre de 3 chiffres'); readln(n); writeln('Combien de nombre des Keith vous aime afficher?'); readln(m); m1:=m; n1:=n; s[2]:=n mod 10; n:= n div 10; s[1]:= n mod 10; n:= n div 10; s[0]:= n mod 10; for i:=3 to m+3 do begin s[i]:=s[i-3]+s[i-2]+s[i-1]; writeln(s[i-3],'+',s[i-2],'+',s[i-1],'=',s[i]); end; end. حاول ان تفهمه بنفسك سيتم وضع الشرح قريبا ان شاء الله |
|||
2013-02-22, 21:40 | رقم المشاركة : 282 | ||||
|
اقتباس:
ارجو في التساؤلات اضافة الطرح العام وشكرا Le terme général ou le principe |
||||
2013-02-27, 21:47 | رقم المشاركة : 283 | |||
|
السلام عليكم و رحمة الله و بركاته من فضلكم أريد برنامج باسكال. soit un matrice "n" ligne et "m" colonne ecrire un sous programe qui calcule la transpose de cette matrice**
ecrire un sous programe qui calcule le produit de la matrice pour satransposee |
|||
2013-02-27, 23:20 | رقم المشاركة : 284 | |||
|
هذا برنامج كيث قمت بكتابته شخصيا مستفيدا من نصائح الاخوة ،،، أرجو منكم تقييما له كود:
program keith; uses wincrt; var a,b,c,d,e,r1,r2,r3,r4,s,k:longint; begin repeat writeln('entrer un nombre composé de 5 chiffres'); readln(k); begin a:= k div 10000; r1:=k-a*10000; b:=r1 div 1000; r2:=r1-1000*b; c:=r2 div 100; r3:=r2-c*100; d:=r3 div 10; r4:=r3-10*d; e:=r4; s:=0; repeat s:=a+b+c+d+e; begin if s=k then writeln(s,' :est un nombre de keith') else a:=b; b:=c; c:=d; d:=e; e:=s; end; until s>k; end; until k>99999 end. |
|||
2013-02-28, 19:09 | رقم المشاركة : 285 | |||
|
بخصوص برنامج كيث فللاسف لم افهمه جيدا الى بعد قراءة نص الموسوعة ويكيبيديا |
|||
الكلمات الدلالية (Tags) |
ملتقى, الالي, الاعلام, طلاب |
أدوات الموضوع | |
انواع عرض الموضوع | |
|
|
المشاركات المنشورة تعبر عن وجهة نظر صاحبها فقط، ولا تُعبّر بأي شكل من الأشكال عن وجهة نظر إدارة المنتدى
المنتدى غير مسؤول عن أي إتفاق تجاري بين الأعضاء... فعلى الجميع تحمّل المسؤولية
Powered by vBulletin .Copyright آ© 2018 vBulletin Solutions, Inc