Telegram-канал ict_advanced - ICT𝘼𝘿𝙑𝘼𝙉𝘾𝙀𝘿️(𝐙𝐞𝐭𝐚 𝐜𝐢𝐫𝐜𝐥𝐞 𝐢𝐧𝐧𝐞𝐫 𝐜𝐢𝐫𝐜𝐥𝐞 𝐯𝐢𝐩𝐞𝐫️)™️: Cryptocurrency

ICT𝘼𝘿𝙑𝘼𝙉𝘾𝙀𝘿️(𝐙𝐞𝐭𝐚 𝐜𝐢𝐫𝐜𝐥𝐞 𝐢𝐧𝐧𝐞𝐫 𝐜𝐢𝐫𝐜𝐥𝐞 𝐯𝐢𝐩𝐞𝐫️)™️

26 December 2024 09:53

این برنامه به زبان C# برای محاسبه دنباله‌های Hailstone (حدس کولاتز) نوشته شده است. در اینجا توضیحی به زبان فارسی از کد ارائه می‌شود:

using System;
using System.Collections.Generic;

namespace Hailstone
{
    class Program
    {
        // تابع hs که دنباله Hailstone را برای یک عدد n محاسبه می‌کند
        public static List<int> hs(int n, List<int> seq)
        {
            List<int> sequence = seq; // دنباله را به صورت یک لیست دریافت می‌کند
            sequence.Add(n); // عدد n را به لیست اضافه می‌کند
            if (n == 1) // اگر عدد 1 باشد، دنباله را برمی‌گرداند
            {
                return sequence;
            }
            else
            {
                // اگر عدد زوج باشد، آن را نصف می‌کند و اگر فرد باشد، 3 برابر کرده و 1 اضافه می‌کند
                int newn = (n % 2 == 0) ? n / 2 : (3 * n) + 1;
                return hs(newn, sequence); // تابع را با عدد جدید فراخوانی می‌کند
            }
        }

        static void Main(string[] args)
        {
            Console.WriteLine("این برنامه دنباله‌های Hailstone (حدس کولاتز) را محاسبه می‌کند.");
            Console.WriteLine("شروع با عدد 27 برای نمایش:");

            // دنباله Hailstone برای یک عدد مشخص (27)
            int n = 23;
            List<int> sequence = hs(n, new List<int>());
            Console.WriteLine($"دنباله {sequence.Count} عنصر دارد.");

            // نمایش شروع و پایان دنباله
            List<int> start = sequence.GetRange(0, Math.Min(4, sequence.Count));
            List<int> end = sequence.GetRange(Math.Max(0, sequence.Count - 4), Math.Min(4, sequence.Count));
            Console.WriteLine($"شروع با: {string.Join(", ", start)} و پایان با: {string.Join(", ", end)}");

            // پیدا کردن عددی که زیر 100000 باشد و طولانی‌ترین دنباله را داشته باشد
            Console.WriteLine("\nاکنون پیدا کردن عددی که زیر 100000 باشد و طولانی‌ترین دنباله Hailstone را داشته باشد...");
            int number = 0, longest = 0;
            for (int i = 1; i < 10000; i++)
            {
                int count = hs(i, new List<int>()).Count;
                if (count > longest)
                {
                    longest = count;
                    number = i;
                }
            }
            Console.WriteLine($"عددی که < 100000 باشد و طولانی‌ترین دنباله را دارد {number} است، با طول {longest}.");
        }
    }
}

توضیحات:
1. کلاس Program شامل یک تابع بازگشتی به نام hs برای محاسبه دنباله Hailstone است.
2. تابع hs عدد n را دریافت کرده و آن را به لیست دنباله اضافه می‌کند. سپس اگر n برابر با 1 باشد، دنباله کامل شده را برمی‌گرداند. در غیر این صورت، عدد بعدی را محاسبه کرده و تابع را دوباره فراخوانی می‌کند.
3. در تابع `Main`، برنامه ابتدا دنباله Hailstone برای عدد 23 را محاسبه کرده و تعداد عناصر دنباله را نمایش می‌دهد.
4. سپس شروع و پایان دنباله را نمایش می‌دهد.
5. در نهایت برنامه عددی که زیر 100000 باشد و طولانی‌ترین دنباله Hailstone را داشته باشد را پیدا کرده و نمایش می‌دهد.

این کد به شما کمک می‌کند تا با مفهوم دنباله‌های Hailstone آشنا شوید و همچنین روش جستجوی عدد با طولانی‌ترین دنباله را یاد بگیرید.