Перевод кода с 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); } } } }
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д