Перевод программы из Pascal в C#
Формулировка задачи:
Описать функцию InvertDigits(K), меняющую порядок следования цифр целого положительного числа K на обратный. С помощью этой функции поменять порядок следования цифр на обратный для каждого из пяти данных целых чисел.
Перевести программу с Pascal в C#
function InvertDigits(k:integer);
var k1:integer;
begin k1:=0;
while k>0 do
begin k1:=k1*10+(k mod 10);
k:=k div 10;
end;
k:=k1;
end;
var a:array[1..5] of integer; i:byte;
begin for i:=1 to 5 do
begin write(i,' chislo: ');
readln(a[i]);
end;
for i:=1 to 5 do
writeln(i,' chislo: ',InvertDigits(a[i]));
readln;
end.Решение задачи: «Перевод программы из Pascal в C#»
textual
Листинг программы
static int InvertDigits(int k)
{
int k1 = 0;
while (k > 0)
{
k1 = k1 * 10 + (k1 % 10);
k /= 10;
}
return k1;
}
static void Main(string[] args)
{
int[] a = new int[5];
for (int i = 0; i < 5; i++)
{
Console.Write("{0} chislo: ", i);
a[i] = int.Parse(Console.ReadLine());
}
for (int i = 0; i < 5; i++)
{
Console.WriteLine("{0} chislo: {1}", i, InvertDigits(a[i]));
}
Console.ReadKey();
}