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

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

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

Переведите пожалуйста код на C# с Паскаля. Если окажите мне услугу, то я вам очень благодарен.
Листинг программы
  1. var
  2. k,n: integer;
  3. d: char;
  4. procedure AddDigit(s: string);
  5. var
  6. c,i: char;
  7. begin
  8. if Length(s)=k then writeln(s)
  9. else begin
  10. if s='' then c:='1' else c:= Succ(s[Length(s)]);
  11. for i:=c to d do AddDigit(s+i)
  12. end
  13. end;
  14. begin
  15. k:= 2;
  16. n:= 5;
  17. d:= Chr(48+n);
  18. AddDigit('');
  19. readln
  20. end.

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

textual
Листинг программы
  1. class Program
  2.     {
  3.         private static int k, n;
  4.         private static char d;
  5.  
  6.         static void Main(string[] args)
  7.         {
  8.             k = 2;
  9.             n = 5;
  10.             d = (char)(48 + n);
  11.             addDigit("");
  12.  
  13.             Console.ReadLine();
  14.         }
  15.  
  16.         private static void addDigit(string s)
  17.         {
  18.             if (s.Length == k)
  19.                 Console.WriteLine(s);
  20.             else
  21.             {
  22.                 char c;
  23.                 if (s == string.Empty)
  24.                     c = '1';
  25.                 else
  26.                     c = (char)(s[s.Length - 1] + 1);
  27.                 for (int i = c; i < d; i++)
  28.                 {
  29.                     addDigit(s+(char)i);
  30.                 }
  31.             }
  32.         }
  33.     }

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


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

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

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

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут