|
قسم أرشيف منتديات الجامعة القسم مغلق بحيث يحوي مواضيع الاستفسارات و الطلبات المجاب عنها ..... |
في حال وجود أي مواضيع أو ردود مُخالفة من قبل الأعضاء، يُرجى الإبلاغ عنها فورًا باستخدام أيقونة ( تقرير عن مشاركة سيئة )، و الموجودة أسفل كل مشاركة .
آخر المواضيع |
|
|
أدوات الموضوع | انواع عرض الموضوع |
2012-06-03, 21:10 | رقم المشاركة : 1 | ||||
|
help me in pascal
أريد حلا لهذا التمارين écrire un program pascal qui calcule x^n x est un nombre real et n nombre entier
|
||||
2012-06-04, 02:59 | رقم المشاركة : 2 | |||
|
السلام عليكم كود:
program djelfa; var x,resultat: real; n,i: integer; begin write ('Donner X ');readln(x); write ('Donner N ');readln(n); for i:= 0 to n do resultat := x*x; write ('Le resultat est egale= ',resultat); readln;readln; end. |
|||
2012-06-04, 03:05 | رقم المشاركة : 3 | |||
|
البرنامج الثاني |
|||
2012-06-04, 03:09 | رقم المشاركة : 4 | |||
|
البرنامج الثالث: كود:
Program CH6_Program12; Var S,st: string; I: integer; Begin Writeln ('Donner le mot '); Readln(s); St:=''; For i:= length(s) downto 1 do St:= st + s[i]; Writeln (st); readln;readln; End. |
|||
2012-06-04, 20:56 | رقم المشاركة : 5 | ||||
|
اقتباس:
هذا الحل غير صحيح .... فكما ترى في وسط الboucle تجرى نفس العملية و هي resultat:=x*x اي انه في النهاية ستحصل على x² و ليس على x¨^n عدل البرنامج حيث حسب حلك يكون resultat:=resultat*x مع وضع resultat=1 قبل بداية الboucle + بداية indice تكون من 1 و ليس من 0 |
||||
2012-06-13, 12:32 | رقم المشاركة : 6 | ||||
|
اقتباس:
هذا هو البرنامج الصحيح بعد الأخذ بما قلته كود:
program djelfa; var x,resultat: real; n,i: integer; begin write ('Donner X ');readln(x); write ('Donner N ');readln(n); resultat:= 1; for i:= 1 to n do resultat := resultat*x; write ('Le resultat est egale= ',resultat); readln;readln; end. |
||||
2012-06-13, 14:35 | رقم المشاركة : 7 | |||
|
السلام عليكم ورحمة الله كود PHP:
بالتوفيق |
|||
الكلمات الدلالية (Tags) |
pascal |
|
|
المشاركات المنشورة تعبر عن وجهة نظر صاحبها فقط، ولا تُعبّر بأي شكل من الأشكال عن وجهة نظر إدارة المنتدى
المنتدى غير مسؤول عن أي إتفاق تجاري بين الأعضاء... فعلى الجميع تحمّل المسؤولية
Powered by vBulletin .Copyright آ© 2018 vBulletin Solutions, Inc