Перевести программу из Pascal в C#: изменить порядок следования цифр числа на обратный
Формулировка задачи:
. Описать функцию InvertDigits(K), меняющую порядок следования цифр целого положительного числа K на обратный. С помощью этой функции поменять порядок следования цифр на обратный для каждого из пяти данных целых чисел.
uses crt; procedure InvertDigits(K:integer;var M:integer); var i:byte; begin M:=0; while K>0 do begin i:=K mod 10; M:=M*10+i; K:=K div 10; end; end; const nmax=100; var a:array[1..nmax] of integer; n,i:integer; begin randomize; repeat write('Размер массива от 1 до ',nmax,' n='); read(n); until n in [1..nmax]; writeln('Исходный массив'); for i:=1 to n do begin a[i]:=10000+random(90000); write(a[i]:8) end; writeln; writeln('Смена порядка цифр на обратный'); for i:=1 to n do begin InvertDigits(a[i],a[i]); write(a[i]:8); end; end.
Решение задачи: «Перевести программу из Pascal в C#: изменить порядок следования цифр числа на обратный»
textual
Листинг программы
procedure InvertDigits(K:integer;var M:integer);
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д