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