Перевод кода PascalABC.NET в код С# - C#

Узнай цену своей работы

Формулировка задачи:

Листинг программы
  1. Program z1;
  2. const
  3. Nmax=50;
  4. type
  5. massiv=array[1..Nmax] of integer;
  6. var
  7. K, A, B, i, min, max:integer;
  8. mas:massiv;
  9. begin
  10. //Ввод размера массива и отрезка для случайных чисел
  11. Writeln('Введите размер массива');
  12. Readln(K);
  13. Writeln('Введите начало отрезка');
  14. Readln(A);
  15. Writeln('Введите конец отрезка');
  16. Readln(B);
  17. //Заполнение массива случайными числами
  18. for i:=1 to K do
  19. begin
  20. mas[i]:=Random(b-a+1)+a;
  21. end;
  22. //Вывод исходного массива по строкам
  23. Writeln('Содержимое исходного массива в строку: ');
  24. for i:=1 to K do
  25. begin
  26. Write(mas[i]:6);//:6 - интервал между цифрами 6
  27. end;
  28. Writeln;
  29. //Вывод исходного массива в столбец
  30. Writeln('Содержимое исходного массива в столбец: ');
  31. for i:=1 to K do
  32. begin
  33. Writeln(mas[i]:6);
  34. end;
  35. min:=mas[1];
  36. max:=mas[1];
  37. for i:=2 to K do
  38. begin
  39. if mas[i]>max
  40. then
  41. max:=mas[i];
  42. if mas[i]<min
  43. then
  44. min:=mas[i];
  45. end;
  46. for i:=1 to K do
  47. begin
  48. if mas[i] mod 2=0
  49. then
  50. mas[i]:=min
  51. else
  52. mas[i]:=max;
  53. end;
  54. Writeln('Содержимое исходного массива в столбец: ');
  55. for i:=1 to K do
  56. begin
  57. Writeln(mas[i]:6);
  58. end;
  59. end.

Решение задачи: «Перевод кода PascalABC.NET в код С#»

textual
Листинг программы
  1. static void PascalTranslation1(string[] args)
  2. {
  3.     Random r = new Random();
  4.  
  5.     //Ввод размера массива и отрезка для случайных чисел
  6.     Console.Write("Введите размер массива: ");
  7.     int len = Int32.Parse(Console.ReadLine());
  8.     int[] mas = new int[len];
  9.  
  10.     Console.Write("Введите начало отрезка: ");
  11.     int a = Int32.Parse(Console.ReadLine());
  12.     Console.Write("Введите конец отрезка: ");
  13.     int b = Int32.Parse(Console.ReadLine());
  14.  
  15.     //Заполнение массива случайными числами
  16.     for (int i = 0; i < len; i++)
  17.         mas[i] = r.Next(b - a + 1) + a;
  18.  
  19.     //Вывод исходного массива по строкам
  20.     Console.WriteLine("Содержимое исходного массива в строку: ");
  21.     foreach (var x in mas)
  22.         Console.Write("{0}, ", x);
  23.     Console.WriteLine();
  24.  
  25.     //Вывод исходного массива в столбец
  26.     Console.WriteLine("Содержимое исходного массива в столбец: ");
  27.     foreach (var x in mas)
  28.         Console.WriteLine(x);
  29.  
  30.  
  31.     int min = mas[0];
  32.     int max = mas[0];
  33.     for (int i = 1; i < len; i++)
  34.         if (mas[i] > max)
  35.             max = mas[i];
  36.         else if (mas[i] < min)
  37.             min = mas[i];
  38.  
  39.     for (int i = 0; i < len; i++)
  40.         if (mas[i] % 2 == 0)
  41.             mas[i] = min;
  42.         else
  43.             mas[i] = max;
  44.  
  45.     Console.WriteLine("Содержимое исходного массива в столбец: ");
  46.     foreach(var x in mas)
  47.         Console.WriteLine(x);
  48. }

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

8   голосов , оценка 3.75 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы