X
تبلیغات
نماشا
رایتل

قرآن در کامپیوتر

دانلود نرم افزار های قرآنی یه صورت رایگان

مغلوب

مغلوب 
کلمه ای را دریافت سپس مغلوب آن را چاپ کند
مثال
ورودی       Rfazli
خروجی      ilzafR

 q  را در آخر هر خط پاک کنید


   cls                                q
input n$                        q
a=len(n$)                     q
for i=a to 1 step -1        q
print mid$ (n$,i,1)         q
next i                           q
end                              q

 

تاریخ ارسال: چهارشنبه 17 مرداد‌ماه سال 1386 ساعت 09:53 ق.ظ | نویسنده: مهندس | چاپ مطلب 0 نظر