o_t_fars

The Oxford Murders 2008 - قتلهاي آكسفورد

o-t-fars — Wed, 11 Jun 2008 08:55:48 GMT

At Oxford University, a professor and a grad student work together to try and stop a potential series of murders seemingly linked by mathematical symbols.

خلاصه داستان فيلم قتلهاي آكسفورد : در دانشگاه آكسفورد يك پروفسور و يك دانشجو براي متوقف كردن قتلهاي زنجيره اي كه با علامات رياضي به هم مربوط ميشوند تلاش ميكنند.

دانلود با كيفيت DIVX

http://rapidshare.com/files/11650449....cd1.part1.rar

http://rapidshare.com/files/11651077....cd1.part2.rar

http://rapidshare.com/files/11651704....cd1.part3.rar

http://rapidshare.com/files/11652358....cd1.part4.rar

http://rapidshare.com/files/11653027....cd1.part5.rar

http://rapidshare.com/files/11653692....cd1.part6.rar

http://rapidshare.com/files/11654353....cd1.part7.rar

http://rapidshare.com/files/11654426....cd1.part8.rar

CD دوم هم روز های دیگه...

گشت و گذار مخفيانه در اينترنت با Easy Hide IP 1.6

o-t-fars — Wed, 11 Jun 2008 08:27:18 GMT

ابزار جدیدی در زمینه آی پی است که طبق گزارشات در بسیاری از موارد از نمونه پرطرفدار مشابه یعنی Hide IP Platinum بسیار بهتر عمل نموده است. این برنامه با شناسایی آی پی و موقعیت جغرافیایی شما با عملکرد خاص خود آی پی شما را مخفی نگه میدارد و در نتیجه سایت هایی که با آی پی شما سر و کار دارند قادر به ذخیره آی پی شما نخواهند بود و با اطمینان خاطر در اینترنت میتوانید فعالیت کنید بدون اینکه نگران باشید. این برنامه علاوه بر مخفی کردن خودکار آی پی شما به طور دستی نیز امکان تغییر آی پی را به شما میدهد.
محافظت شما از سایت هایی که از روی آدرس IP ، جاسوسی تان را کرده و ایمیل های تبلیغاتی بیشماری برایتان ارسال می کنند، محافظت از اطلاعات شخصی شما از جمله آدرس ایمیل تان ، تا آژانس های تبلیغاتی و بازاریاب ها نتوانند با بدست آوردن آنها و همچنین دانستن علاقه مندی های شما، برایتان ایمیل های تجاری و تبلیغاتی ارسال کنند، محافظت از کامپیوتر تان، با مخفی نمودن آدرس IP و همچنین سیستم عامل از دست حملات هکرها، قابلیت تعویض متناوب آدرس IP جهت افزایش ضریب اختفاء و امنیت در اینترنت، از بین بردن محدودیت هائی که برخی از صاحبان منابع اینترنتی در برخی از کشورها و منطق جغرافیایی برای کاربران اعمال می کنند، فرستادن اطلاعات بدون نشان دادن آدرس IP واقعی تان، توانائی نظارت و بازبینی عملیات موتورهای جستجو بیگانه، فعال و غیر فعال نمودن برنامه تنها با یک کلیک و ...

دانلود با حجم ۲.۵ مگابایت

پسورد فایل : www.kamyabonline.com

Mehran & Rezaya & Moghadam & Nariman & ... - Irooni

o-t-fars — Wed, 14 May 2008 18:59:35 GMT

آهنگ جدید و بسیار زیبای ایرونی کاری از مهران مستی ، رضایا ، مهدی مقدم ، نریمان ، حسین استیری ، مهدی مدرس و 2afm

Mehran & Rezaya & Nariman & Estiri & Moghadam & Modares & 2afm - Irooni 128.mp3

Reza Sadeghi - Kojaei

o-t-fars — Wed, 07 May 2008 20:23:22 GMT

آهنگ جدید و بسیار زیبای رضا صادقی به نام کجایی ؟؟

Reza Sadeghi - Kojaei 128.mp3

بازی عجیب

shahrooz — Wed, 07 May 2008 13:45:33 GMT

سلام بچه ها نظرتون در باره این بازی چیه

سوال امتحان و جواب

shahrooz — Tue, 06 May 2008 09:22:18 GMT

سلام دوستان خوب هستید امتحان برنامه نویسی چه جور دادید ؟

ایشا الله که همگی خوب داده باشید

بچه ها در این پست جواب سوال آخرو گذاشتم که شاید یکیم الکی الکی پیچونده

باشمش به هر حال اگر کسی سر جلسه امتحان نتونسته جواب بده و دوست داره که

بتونه از چه طریقی قابل محاسبه هست می تونه از لینک زیر استفاده کنه

لینک دانلود

این عکس روبرو نمونه خروجی می باشد که در حالت های مختلف بیان شده.

البته طریق آسان تری هم داشته

و در ضمن اینم به بچه هایی که نمی دونن تا الان بگم که جواب سوال یک خود عدد می شده

اینجوری که اگر ۲۴۸۵ بوده

را چاپ می کرده و جواب نه ۲ میشده نه مقلوب عدد بلکه خود عدد بوده

البته میدونم که دیگه همگی فهمیدید اما ...

اینم نمونه برنامه هست برای که اجرا کنید و به اطمینان پیدا کنید

البته این سوال در صفحه ۹۳ کتاب آقای جعفر نژاد قمی قسمت تمرین حل شده است.

لینک دانلود

« مبدل مبنا »

shahrooz — Tue, 06 May 2008 08:44:17 GMT

برنامه مبدل مبنا

با اين برنامه كوچك قادر خواهيد بود كه اعداد مبناي 2، مبناي 8، مبناي 16 و كد اسكي معادل آنها را به طور همزمان يكجا داشته باشيد. عدد مي تواند در فرم هاي 4 بيتي، 8 بيتي، 16 بيتي و 32 بيتي باشد. همچنين با يك كليك مي توانيد معكوس عدد ، شيفت به راست و شيفت به چپ عدد را هم ببينيد. چرخش عدد به راست و چپ هم يكي از قابليتهاي جالب اين برنامه كوچك است. نتايج بر روي همه قسمتها، همزمان و با تغيير هر كدام از قسمتها تغيير مي كنند.

دانلود برنامه : مبدل مبنا
( 103 كيلوبايت )

تغییر مبنا (راه حل ابتکاری -جدید )

shahrooz — Tue, 06 May 2008 08:15:18 GMT

گر عدد N در مبنای ۱۰ باشد و بخواهیم ان را به مبنای ۲ ببریم بجای تقسیمات متوالی بر ۲ عدد را در ۵

بطریق زیر ضرب میکنیم . اگر N زوج باشد با ضرب در ۵ صفر خارج قسمت بعنوان یک رقم بحساب

میاوریم . ولی اگر عدد فرد باشد پس از کسر واحد از ان و ضرب در ۵ از صفرش صرف نظر میکنیم .

با اين كد ميتونين يه عدد رو از مبناي ۲ تا ۳۶ به يه عدد ديگه با مبناي توي همين بازه تبديل كنين.كد از

۳ تا تابع تشكيل شده كه يكيش عدد از از مبناي n به مبناي ۱۰ مياره يكي از مبناي ۱۰ به مبناي n و

سومي هم با ادغام اين ۲ تا تابع يك عدد رو از يك مبنا به مبناي ديگه ميبره.چون عددي كه به اين تابع

ميديم ميتونه مبناش بيشتر از ۱۰ باشه بايد از نوع رشته اي باشه مثلا "FFFFF1" در مبنای 16 یا "

HCAA10" در مبناي ۱۸ يا بيشتر. تابع اول عدد ورودي رو ميگيره بعد مبناي ورودي بعد مبناي خروجي و

جواب رو هم به همون دليلي كه براي وروديش گفتم به صورت رشته برميگردونه:

Public Function BaseNto10(ByVal Number As String, ByVal _
FromBase As Byte) As Long

    Dim Number_Base10 As Long
    Dim Cnt As Long
    Dim NumberLen As Long
    Dim Digit As Integer

    NumberLen = Len(Number)
    For Cnt = 1 To NumberLen

        Digit = Asc(UCase$(Mid$(Number, Cnt, 1)))
        If (FromBase < 11) Then
            If (Digit > 57 Or Digit < 48) Then
                BaseNto10 = 0
                Exit Function
            End If
        Else
            If (Digit < 48 Or (Digit > 57 And Digit < 65) Or Digit > 54 + FromBase) Then
                BaseNto10 = 0
                Exit Function
            End If
        End If
        If (Digit > 47 And Digit < 58) Then
                Digit = Digit - 48
        Else
                Digit = Digit - 55
        End If
        Number_Base10 = Number_Base10 + Digit * FromBase ^ (NumberLen - Cnt)
    Next

    BaseNto10 = Number_Base10

End Function

Public Function Base10ToN(ByVal Number As Long, ByVal ToBase As Byte) _
As String

    Dim Number_NewBase As String
    Dim Temp As Long, Reminder As Long
    Dim SDigit As String

    Temp = Number
    Do While (True)
        If (Temp < ToBase) Then
            If (Temp < 10) Then
                SDigit = Temp
            Else
                SDigit = Chr$(55 + Temp)
            End If
            Number_NewBase = SDigit & Number_NewBase
            Exit Do
        End If
        Reminder = Temp Mod ToBase
        Temp = Temp \ ToBase
        If (Reminder < 10) Then
            SDigit = Reminder
        Else
           SDigit = Chr$(55 + Reminder)
        End If
        Number_NewBase = SDigit & Number_NewBase
    Loop

    Base10ToN = Number_NewBase

End Function

Public Function ChangeBase(ByVal Number As String, ByVal _
FromBase As Byte, ByVal ToBase As Byte) As String

ChangeBase = Base10ToN(BaseNto10(Number, FromBase), ToBase)

End Function

براي استفاده از تابع هم , مثلا براي بردن عدد "123456" از مبنای 7 به مبنای 2 از این کد میشه استفاده کرد : Call MsgBox(ChangeBase("123456", 7, 2))

اینم عاقبت پسر دانشجو

shahrooz — Sat, 03 May 2008 10:18:18 GMT

اینم عاقبت این پسر دانشجو

از من گوش کنید

از این دخت ها که موجود عجیب هستند باید ترسید

رقابت بین كرستيانو رونالدو و ماشین !!!

o-t-fars — Fri, 02 May 2008 16:16:18 GMT

کلیپ دیدنی رقابت بین كرستيانو رونالدو و ماشین ، به نظر شما کدام یکی برنده می شود ؟

Download

پسورد فایل : www.kamyabonline.com