بازی

[arashrj]

سلام
راهنمایی اینه که : به صورت زوج و فرد عوض میشه (یعنی زوجش یه الکگوریتم و فردش هم یه الگوریتم دیگه ) (الیته الگوریتم هاش هم خیلی معروفه )
(الگوریتم هاش رو هم همه می دونن !)

برای راهنمایی بیشتر به اسم دیگه رو هم کد می کنم :

جمله : arashrj@gmail.com
98-119-99-122-111-129-121-85-137-138-186-142-343-91-709-164-1706-

موفق باشی

[Agary]

سلام دوستان یک سال به همین سرعت گذشت .
داشتم بعد از یک سال پست های این تاپیک رو می خوندم که متاسفانه به دلایلی در یک سال قبل ناگهان دیگر در اون پست ندادم .
خواستم بعد یک سال سلامی عرض کنم ، عید رو تبریک بگم و دوباره از همون تاپیکی که کارم رو در ایران ویچ تموم کردم ، دوباره شروع کنم .
به هر حال هم اون موقع و هم الان شرمندم که یک دفعه کنار کشیدم.

اینم یه سوال :
کلمه ی Iranvig با یک الگوریتم تبدیل به
Hqsb`mmuwjjh
شده است.
پیش بینی کنید که کلمه ی HI every oNe به چه صورت خواهد شد ؟
آقای amirjan امیدوارم که پس رفت نکرده باشم (بعد یک سال).

[Agary]

سلام دوستان ، احساس کردم زیادی سخت شد چو الگوریتمش رو با وی بی نوشتم گفتم شاید ذهنی نشه حساب کرد این بود که یه جور دیگه نوشتم به هر حال هر کدوم رو که دوست دارین حل کنین (البته اگه کسی به این تاپیک سری بزنه)
خوب طبق معمول کلمه ی Iranvig شده :

کد:

Hqbmujh

عبارت :

کد:

J(l!Rnqrx

به چه معناست؟
سطح : مقدماتی

[t3r!p3000]

فكر كنم كد اسكيشون رو بعلاوه و منهاي يك كردي . ( نيمه اول الفبا بعلاوه يك و نيمه دوم منهاي يك )

[Agary]

فكر كنم كد اسكيشون رو بعلاوه و منهاي يك كردي . ( نيمه اول الفبا بعلاوه يك و نيمه دوم منهاي يك )

سلام
ممنون که نظر دادین :
خیلی نزدیک شدین منم راهنمایی نمی تونم بکنم .
فقط :
در مورد + و - کردن درسته ولی نظم دیگه ای داره.
ممنون
پ.ن : دوستان فکر می کنم که یه مقداری زیادی داریم در مورد اسکی ها کار می کنیم . کلا منظورم اعداد در حروفه .
پیشنهاد می کنم که خودمون دست به کار بشیم و قوانین جدیدی رو ابداع کنیم .
مثال می زنم :

کد:

2*A= AA
A+1=B
etc...

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

[Agary]

بسیار خوب حالا که کسی از عزیزان جواب رو ارسال نمی کنه خودم دست به کار می شم .
البته کد وی بی رو براتون می ذارم اگر کسی از عزیزان متوجه نشد (که قطعا این طور نخواهد شد چون همه استاد بنده هستند) بی هیچ تعارفی بفرمایند حقیر در خدمتم .
از اساتید عزیز معذرم می خوام و امیدوارم که جسارت بنده رو ببخشن :

کد:

Dim a, d, e, f As Integer
Dim j, b, c, g, h As String
j = ""
a = Len(Text1.Text)
For i = 1 To a - 1
b = Mid(Text1.Text, i, 1)
c = Mid(Text1.Text, i + 1, 1)
d = StrComp(b, c, vbBinaryCompare)
e = Asc(b) + d
f = Asc(c) + d
g = Chr(e)
h = Chr(f)
j = j + g + h
Next i
Label1.Caption = j

این جواب قسمت اول (اولین سوال)

اما جواب سوال دوم

کد:

Dim a, d, e, f As Integer
Dim j, b, c, g, h As String
j = ""
a = Len(Text1.Text)
For i = 1 To a - 1
S1 = Mid(Text1.Text, i, 1)
S2 = Mid(Text1.Text, i + 1, 1)
d = StrComp(S1, S2, vbBinaryCompare)
If i = 1 Then
e = Asc(S1) + d
f = Asc(S2) + d
g = Chr(e)
h = Chr(f)
j = j + g + h
Else
f = Asc(S2) + d
h = Chr(f)
j = j + h
End If
Next i
Label1.Caption = j

خوب سوال بعدی رو بدون استفاده از کد اسکی خواهم گذاشت.
تا پست بعد...

[Agary]

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

کد:

34   8   233   233   987   -   8   28657   8   4181   121393   -   987   610   8

1. تمام عبارات به کار رفته بدون استفاده از اسکی است
2. عبارت انگلیسی می باشد
3. پرکاربرد ترین کلمه در این زبان e می باشد
4. عبارت به کوچک و بزرگ بودن حروف حساس نیست
5. هر خط فاصله نمادی از فاصله ی بین کلمات بوده و هر عدد نمادی از یک حرف است
6. عبارت از چپ به راست است
7. تصاعد ، دنباله ... حدس بزن خیلی کمک کردم

[Agary]

دوستان خیلی سخت بود ؟
ببخشید که من پشت سر هم پست می دم ولی هیچ کس نظر نمی ده .
خوب یه راهنمایی دیگه که تقریبا جوابه
البته اینو فقط برای این دفعه می نویسم چون تا حالا با این روش کار نشده بود :

کد:

i = 1
List1.AddItem (Str(i))
b = 1
List1.AddItem (Str(b))
i = i + b
List1.AddItem (Str(i))
b = b + i
List1.AddItem (Str(b))
For c = 1 To Text1.Text - 4
If c Mod 2 <> 0 Then
i = i + b
List1.AddItem (Str(i))
ElseIf c Mod 2 = 0 Then
b = i + b
List1.AddItem (Str(b))
End If
Next c

فکر کنم به اندازه ی کافی راهنمایی کردم و در ضمن کد برای وی بیه هااا

[arashrj]

سلام
لطفا سوالی رو که قرار می دی تا 2-3 روز جوابش رو عمومی نکن . من که هر وقت رسیدم اینجا دیدم جواب هم هست .
چند تاپست قبلی (اولین پستهای این تاپیک) رو نگاه کن ، ببین ما چطور تفریح می کردیم.

موفق باشی

[Agary]

راستش تا به حال که هیچکس جز آقای terip2008 پست نزده بود منم گفتم که لابد هیچکس نمیاد . به خاطر همین برای اینکه تند تند بگذره و تاپیک نخوابه پشت سر هم پست می زدم .
چشم از این به بعد ...
حالا هم که هنوز جواب رو ندادم .
شما از برنامه استفاده نکنین !

[arashrj]

سلام
کلمه iranvig به کمک یک الگوریتم تبدیل به 01.79.19.81.65.19.22.09.18.41.81 شده است
حال جمله زیر را از حالت کد خارج کنید :

کد:

13.11.98.16.52.02.18.10.70.17.11.56

موفق باشید