|
منتدى البرمجة كل ما يتعلق بلغات البرمجة، فيجوال بيسيك , سي ++ , دلفي , أكسيس , جافا , هتمل... |
في حال وجود أي مواضيع أو ردود مُخالفة من قبل الأعضاء، يُرجى الإبلاغ عنها فورًا باستخدام أيقونة ( تقرير عن مشاركة سيئة )، و الموجودة أسفل كل مشاركة .
آخر المواضيع |
|
ممكن مساعدة في حل هذه التمارين
|
أدوات الموضوع | انواع عرض الموضوع |
|
2013-06-20, 13:07 | رقم المشاركة : 1 | ||||
|
ممكن مساعدة في حل هذه التمارين
السلام عليكم قم بانشاء برنامج دلفي يسمح بادخال عرض (largeur) و طول (longueur ) مستطيل ثم يقومبحساب مساحته. علما ان مساحة (surface ) =العرض في الطول . -قم بانشاء برنامجدلفي يسمح بحساب المحيط علما ان : المحيط (périmetre)= 2* (العرض + الطول) . ملاحظة: هناك احد اعضاء بارك الله فيه قام باعطائي الحل بالدالفي جزاه الله خيرا
|
||||
2013-06-20, 15:44 | رقم المشاركة : 2 | |||
|
حساب المساحة ب VB.NET كود:
Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub Function print(ByVal x As Double, ByVal y As Double) As Integer Dim result As Double If x = Val("") Then result = 1 * y Else result = x * y End If MsgBox(result) End Function Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim x, y As Double x = Val(TextBox1.Text) y = Val(TextBox2.Text) print(x, y) End Sub End Class |
|||
2013-06-20, 19:30 | رقم المشاركة : 3 | |||
|
مشكور اخي الفاضل ممكن بالبسكال و خورزميات |
|||
2013-06-20, 19:50 | رقم المشاركة : 4 | |||
|
انا لا اجيد الباسكال انا مركز على VB.net |
|||
2013-06-21, 08:32 | رقم المشاركة : 5 | |||
|
merci merci |
|||
2013-06-21, 11:17 | رقم المشاركة : 6 | |||
|
كود:
program ex; uses wincrt; var i,j,a,b:real; begin writeln('Entrez longeur:'); readln(i); writeln('Entrez largeur:'); readln(j); a:=i*j; b:=(i+j)*2; writeln('la surface est:',a); writeln('pirimetre est:',b); end. |
|||
2013-06-21, 11:21 | رقم المشاركة : 7 | |||
|
كود:
algorithme ex; var i,j,a,b:real; deput ecrire ('donner longeur:'); lire(i); ecrire('donner largeur'); lire(j); a:=i*j; b:=(a+b)*2; ecrire('surface est''); ecrire(a); ecrire('pirimetre est:'); ecrire(b); fin. |
|||
2013-06-23, 12:35 | رقم المشاركة : 8 | |||
|
بارك الله فيك اخي الكريم و زادكا لله في لعلم و الحسنات |
|||
الكلمات الدلالية (Tags) |
ممكن, مساعدة, التمارين |
أدوات الموضوع | |
انواع عرض الموضوع | |
|
|
المشاركات المنشورة تعبر عن وجهة نظر صاحبها فقط، ولا تُعبّر بأي شكل من الأشكال عن وجهة نظر إدارة المنتدى
المنتدى غير مسؤول عن أي إتفاق تجاري بين الأعضاء... فعلى الجميع تحمّل المسؤولية
Powered by vBulletin .Copyright آ© 2018 vBulletin Solutions, Inc