▬ درخواست چند تا کد ساده

[Jeff hardy M]

سلام
دوستان لطفاً یکی کد های این سوال های زیر روئ برام پ.خ کنه .. ممنون میشم
(هر کدوم از سوال ها جدا هست و کد هاشون رو جدا لازم دارم)

1. برنامه ای بنویسید که سه عدد را دریافت و بزرگترین مقدار بین انها را چاپ کند .
2. برنامه ای بنویسید که سه عدد را از ورودی بگیرد و تعیین کند که ایا با این سه عدد میتوان یک مثلث ساخت ؟
3. یک دستور if بنویسید که تساوی سه عدد را نشان دهد
4. برنامه ای بنویسید که سه عدد از ورودی بگیرد و تعیین کند که ایا با این سه عدد میتوان یک مثلث قائم الزاویه ساخت یا نه؟


ممنون میشم یکی کد های مربوط به این دستور عمل ها رو برام بگه

[sadeghbarout]

برنامه اول

a = InputBox("a:")
b = InputBox("b:")
c = InputBox("c:")
If a > b Then Max = a Else Max = b
If c > Max Then Max = c
MsgBox Max

برنامه دوم

حالش رو ندارم

برنامه سوم

a = InputBox("a:")
b = InputBox("b:")
c = InputBox("c:")
If (a = b) Then
If a = c Then MsgBox a
End If

برنامه چهارم

a = InputBox("a:")
b = InputBox("b:")
c = InputBox("c:")
If a ^ 2 = b ^ 2 + c ^ 2 Or b ^ 2 = c ^ 2 + a ^ 2 Or c ^ 2 = b ^ 2 + a ^ 2 Then MsgBox "yes"

خوب بید

[Jeff hardy M]

ممنون میشم اون یکی رو هم یکی بگه

[Jeff hardy M]

برنامه اول

a = InputBox("a:")
b = InputBox("b:")
c = InputBox("c:")
If a > b Then Max = a Else Max = b
If c > Max Then Max = c
MsgBox Max

برنامه دوم

حالش رو ندارم

برنامه سوم

a = InputBox("a:")
b = InputBox("b:")
c = InputBox("c:")
If (a = b) Then
If a = c Then MsgBox a
End If

برنامه چهارم

a = InputBox("a:")
b = InputBox("b:")
c = InputBox("c:")
If a ^ 2 = b ^ 2 + c ^ 2 Or b ^ 2 = c ^ 2 + a ^ 2 Or c ^ 2 = b ^ 2 + a ^ 2 Then MsgBox "yes"

خوب بید

ممنون 2تای وال رو تست کردم کار کرد 4 رو تست نکردم
اگه اون یکی رو هم بگی ممنون میشم
تا فردا لازم دارم

[sadeghbarout]

شرط وجود مثلث چیه؟
یادم رفته مثلا هم میخوایم کنکور بدیم

[Jeff hardy M]

نمیدونم والا ... !
من اگه مخم کار میکرد خودم مینوشتم
نصف شبی هیچی یادم نمیاد !
اگه تا فردا صبح هر کی میتونه بگه
ممنون میشم

[amirxbest]

دوست عزیز بیا اینم الگوریتمش خودت به کد تبدیل کن خیلی راحته:

0- شروع.
1- a وb وc را از ورودی بگير.
2- اگر a>b+c به 7 برو.
3- اگر b>a+c به 7 برو
4 - اگرc>a+b به 7 برو.
5- بنويس " بلی ".
6- به 8 برو.
7 - بنويس " خير ".
8- پايان.

شرمنده 10 دقیقه دیگه باید سر کلاس باشم اما هنوز پشت کامپیوتر هستم وگرنه کد میذاشتم
موفق باشی.