Перевести с паскаля на с# - C# (195352)

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

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

Помогите перевести
program array35;
uses crt;
var
  a:array[1..100] of integer;
  i,k,k1,k2,n:integer;
procedure mas;
  begin
    for i:=1 to n do
      write(a[i]:5);
  end;
begin
  clrscr;
  writeln('введите количество элементов массива:');
  read(n);
    for i:=1 to n do
    begin
      writeln('введите a[',i,'] элемент массива:');
      read(a[i]);
    end;
  clrscr;
  writeln('Исходный массив a :');
  mas;
  k:=a[1];
  k1:=a[2];
  k2:=a[3];
  for i:=1 to n-3 do
    a[i]:=a[i+3];
    a[n]:=k2;
    a[n-1]:=k1;
    a[n-2]:=k;
  writeln;
  writeln('Полученный массив a :');
  mas;
end.

Решение задачи: «Перевести с паскаля на с#»

textual
Листинг программы
using System;
 
namespace Trash
{
    class Program
    {
        static void Main(string[] args)
        {
            Console.Clear();
            Console.WriteLine("Введите количество элементов массива");            
            int[] a = new int[int.Parse(Console.ReadLine())];//объявляем массив введенного с клавиатуры размера
            for (int i=0; i<a.Length; i++) //заполняем его
            {
                Console.WriteLine("Введите a[" + i.ToString() + "] элемент массива");
                a[i] = int.Parse(Console.ReadLine());
            }
            Console.Clear();
            Console.WriteLine("Исходный массив а:");
            mas(a); //вызов метода вывода
            int k = a[0], k1 = a[1], k2 = a[2]; //буферы для выполнения сдвига на 3
            for (int i = 0; i < a.Length - 3; i++) //цикл сдвига
                a[i] = a[i + 3];
            a[a.Length - 1] = k2; //дописываем значения из буферов
            a[a.Length - 2] = k1;
            a[a.Length - 3] = k;
            Console.WriteLine("Полученный массив");
            mas(a); //вызов метода вывода
            Console.ReadLine(); 
        }
 
        static void mas(int[] a) //метод вывода массива, параметр - массив который выводится
        {
            for (int i = 0; i < a.Length; i++) //цикл по количеству элементов в массиве
                Console.Write("{0,5}", a[i]); //вывод поэлементо по 5 позиций на элемент
            Console.WriteLine(); //перевод строки
        }
    }
}

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


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

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

13   голосов , оценка 3.692 из 5