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