ًQbasic

محیط و مساحت دایره

Cls

Input  Shoa

Print  Shoa*Shoa*3.14

Print (Shoa+Shoa)*3.14

End

محیط و مساحت مربع

Input zale

Print zale*4

Print zale* zale

End

محیط و مساحت مستطیل

Input Tool

Input Arz

Print(Tool+Arz)*2

End

Print"-+-+-+-+-+-+-+-+-+-+-+-+-+-+-"

Print"| moharram                                 |"

Print"|             2012                             |" 

Print"|                   1391                       |"

Print"|                       Nima hoseini        |"

Print"|-+-+-+-+-+-+-+-+-+-+-+-+-+-+-"