Программалық блоктағы үш жұмыс режим

Var a: array of integer; // Объявление массива целых чисел
  i, n: integer; // объявление целочисленных переменных
begin
  // Запросим с клавиатуры размер массива
  // и запишем его в переменную n
  write('введите n:'); 
  readln(n);
  
  // Теперь выделим память под n элементов массива
  SetLength(a, n);
  
  // теперь запросим с клавиатуры n чисел для массива
  for i := 0 to n-1 do begin
    write('a[', i, ']=');
    readln(a[i]);
  end;
  
  // теперь в цикле уменьшим каждый элемент на единицу
  for i := 0 to n-1 do 
    a[i] := a[i] - 1;
  
  // распечатаем массив
  for i := 0 to n-1 do 
    write(a[i], ' ');
end.

using System;

using System.Collections.Generic;

using System.Linq;

using System.Text;

 

namespace ConsoleApplication1

{

    class Program

    {

        static void Main(string[] args)

        {

            //Дана последовательность целых чисел вывести на печать только те числа для которых a >=i в С#

            Console.WriteLine("Введи i");

            int i = int.Parse(Console.ReadLine());

            Console.WriteLine("Введи число целых чисел");

            int n = int.Parse(Console.ReadLine());

            int[] a = new int[n];

            Console.WriteLine("Введи числа");

            for (int j = 0; j < n; j++)

            {

                a[j] = int.Parse(Console.ReadLine());

            }

            Console.WriteLine("ответ");

            for (int j = 0; j < n; j++)

            {

                if (a[j] >= i)

                    Console.WriteLine(a[j]);

            }

            Console.ReadKey();

        }

    }

}