Перевод кода PascalABC.NET в код С# - C#
Формулировка задачи:
Program z1; const Nmax=50; type massiv=array[1..Nmax] of integer; var K, A, B, i, min, max:integer; mas:massiv; begin //Ввод размера массива и отрезка для случайных чисел Writeln('Введите размер массива'); Readln(K); Writeln('Введите начало отрезка'); Readln(A); Writeln('Введите конец отрезка'); Readln(B); //Заполнение массива случайными числами for i:=1 to K do begin mas[i]:=Random(b-a+1)+a; end; //Вывод исходного массива по строкам Writeln('Содержимое исходного массива в строку: '); for i:=1 to K do begin Write(mas[i]:6);//:6 - интервал между цифрами 6 end; Writeln; //Вывод исходного массива в столбец Writeln('Содержимое исходного массива в столбец: '); for i:=1 to K do begin Writeln(mas[i]:6); end; min:=mas[1]; max:=mas[1]; for i:=2 to K do begin if mas[i]>max then max:=mas[i]; if mas[i]<min then min:=mas[i]; end; for i:=1 to K do begin if mas[i] mod 2=0 then mas[i]:=min else mas[i]:=max; end; Writeln('Содержимое исходного массива в столбец: '); for i:=1 to K do begin Writeln(mas[i]:6); end; end.
Решение задачи: «Перевод кода PascalABC.NET в код С#»
textual
Листинг программы
static void PascalTranslation1(string[] args) { Random r = new Random(); //Ввод размера массива и отрезка для случайных чисел Console.Write("Введите размер массива: "); int len = Int32.Parse(Console.ReadLine()); int[] mas = new int[len]; Console.Write("Введите начало отрезка: "); int a = Int32.Parse(Console.ReadLine()); Console.Write("Введите конец отрезка: "); int b = Int32.Parse(Console.ReadLine()); //Заполнение массива случайными числами for (int i = 0; i < len; i++) mas[i] = r.Next(b - a + 1) + a; //Вывод исходного массива по строкам Console.WriteLine("Содержимое исходного массива в строку: "); foreach (var x in mas) Console.Write("{0}, ", x); Console.WriteLine(); //Вывод исходного массива в столбец Console.WriteLine("Содержимое исходного массива в столбец: "); foreach (var x in mas) Console.WriteLine(x); int min = mas[0]; int max = mas[0]; for (int i = 1; i < len; i++) if (mas[i] > max) max = mas[i]; else if (mas[i] < min) min = mas[i]; for (int i = 0; i < len; i++) if (mas[i] % 2 == 0) mas[i] = min; else mas[i] = max; Console.WriteLine("Содержимое исходного массива в столбец: "); foreach(var x in mas) Console.WriteLine(x); }
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д