آموزش برنامه نویسی Small Basic اسمال بیسیک (قسمت ششم)
28 بار بازدید -
2 ماه پیش
-
توی این ویدیو تلاش کردم
توی این ویدیو تلاش کردم دستور While رو بهتون معرفی کنم امید وارم لذت ببرید
شروع : 00:00
معرفی دستور وایل (While) : 00:21
برنامه اول : 01:00
برنامه دوم : 04:42
برنامه سوم : 10:35
برنامه چهارم : 13:22
__________________________
کدهای زیر را دقیقا به همین شکل در اسمال بیسیک Cope (کپی) و Paste (پست) کنید تا کار کنند
کد های برنامه اول :
While (1=1)
TextWindow.Write("Enter a Number: ")
n = TextWindow.ReadNumber()
If Math.Remainder(n,2)=0 Then
TextWindow.WriteLine(n + " is Even.")
Else
TextWindow.WriteLine(n + " is Odd.")
EndIf
TextWindow.WriteLine("")
EndWhile
While (1=1)
TextWindow.Write("Enter a Number: ")
n = TextWindow.ReadNumber()
If Math.Remainder(n,2)=0 Then
TextWindow.WriteLine(n + " is Even.")
Else
TextWindow.WriteLine(n + " is Odd.")
EndIf
TextWindow.WriteLine("")
EndWhile
کد های برنامه دوم :
TextWindow.Write("Enter a Number: ")
n = TextWindow.ReadNumber()
While (n>=1)
TextWindow.WriteLine(n)
n = n/2
EndWhile
کدهای برنامه سوم :
i = 1
While (i=1)
TextWindow.WriteLine(i)
i = i - 2
EndWhile
TextWindow.WriteLine("")
For i = 10 To 1 Step -2
TextWindow.WriteLine(i)
EndFor
TextWindow.WriteLine("")
2 ماه پیش
در تاریخ 1403/04/15 منتشر شده
است.
28
بـار بازدید شده