ماکسیمم سه عدد، فلوچارت و کد ویژوال بیسیک

    برنامه ای بنویسید که سه عدد را دریافت کرده و ماکسیمم آنها را نمایش دهد

ادامه نوشته

بخش پذیری بر 4و6، فلوچارت و کد ویژوال بیسیک

   برنامه ای بنویسید که عددی را دریافت کرده و بخش پذیری بر 4و 6 را بررسی و نتیجه را با پیغام نمایش دهد.

ادامه نوشته

حل بعضی از مسائل برنامه نویسی کتاب مبانی سوم ریاضی

توان رسانی یک عدد ، نمودار گردشی و کد

 

   برنامه ای بنویسید که دو عدد m , n را دریافت کرده و حاصل m به توان n  را  نمایش دهد.

 

 

 

    برای کد نویسی ابتدا فرم جدیدی ایجاد کرده و بر آن جعبه متنی به نام Text1  و لیبلی به نام label1 ایجاد کنید .

 

 

 

   سپس بر صفحه خالی فرم کلیک کرده کد زیر را در صفحه کد وارد نمائید.

 

 

   در این کد با ساختار تکرار به کمک دستور     do       loop while  آشنا می شوید.

 

 

 

 

Private Sub Form_Load()

Dim n, m, p As Integer

m = Val(InputBox("Paie ra vared konid", "Paie=m"))

n = Val(InputBox("Tavan ra vared konid", "Tavan=n"))

Label1.Caption = Str(m) + " be tavan " + Str(n) + " = "

p = 1

Do

   p = p * m

 

   n = n - 1

Loop While n <> 0

 

 

Text1.Text = Str(p)

End Sub

ادامه نوشته

تقدیر و تشکر

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

 خانمها : سیده نگین حاجی سید جوادی ، شیرین بنی آدم ، مرضیه خزاعی و فاطمه ملک محمدی

نمونه سوال مبانی کامپیوتر

سوالات برنامه نویسی                             طراح سوال:آقای کامبیز مینائی

دبیردبیرستان غیردولتی ملاصدرا

ادامه نوشته

پیام تبریک

فاطمه يعني شرف،يعني حجاب فاطمه فخر زنان، روز حساب فاطمه يعني رضاي کردگار شاهکار خلقت پروردگار ولادت حضرت فاطمه(س) مبارک باد

برگزاری دومین مجمع و کارگاه آموزشی دبیران رایانه

دومین مجمع و کارگاه آموزشی با موضوع آموزش نرم افزار mmb در تاریخ 92/2/5  در هنرستان علامه جعفری واقع در باغ فیض با حضور سرکار خانم عزیز محمدی به عنوان مدرس کارگاه برگزار شد .

با تشکر از همه همکارانی که با حضور خود موجب دلگرمی گروه رایانه شدند.

تقدیر و تشکر

با تشکر از همکارانی که در مسابقه شماره 2 دبیران کامپیوتر شرکت نمودند خانمها نگین حاج سید جوادی و الناز حسینی به ترتیب از دبیرستان های پروفسور حسابی و هدی به عنوان نفرات برگزیده انتخاب شدند و جوائزی به رسم یادبود به آنان تقدیم شد.