Перевод кода с Pascal - C# (193249)

Узнай цену своей работы

Формулировка задачи:

Переведите пожалуйста код на C# с Паскаля. Если окажите мне услугу, то я вам очень благодарен.
var
  k,n: integer;
  d: char;
 
procedure AddDigit(s: string);
var
  c,i: char;
begin
  if Length(s)=k then writeln(s)
  else begin
    if s='' then c:='1' else c:= Succ(s[Length(s)]);
    for i:=c  to d do AddDigit(s+i)
  end
end;
 
begin
  k:= 2;
  n:= 5;
  d:= Chr(48+n);
  AddDigit('');
  readln
end.

Решение задачи: «Перевод кода с Pascal»

textual
Листинг программы
class Program
    {
        private static int k, n;
        private static char d;
 
        static void Main(string[] args)
        {
            k = 2;
            n = 5;
            d = (char)(48 + n);
            addDigit("");
 
            Console.ReadLine();
        }
 
        private static void addDigit(string s)
        {
            if (s.Length == k)
                Console.WriteLine(s);
            else
            {
                char c;
                if (s == string.Empty)
                    c = '1';
                else
                    c = (char)(s[s.Length - 1] + 1);
                for (int i = c; i < d; i++)
                {
                    addDigit(s+(char)i);
                }
            }
        }
    }

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

10   голосов , оценка 4.4 из 5