Дана программа на языке Паскаль. Заполни пропуски.

Вывод на экран квадратов чисел от 1 до 42.

var
: integer;
begin
for n:=1 todo
do
writeln(sqr()
));
readln;
end.

//Microsoft (R) C/C++ Optimizing Compiler Version 19.00.23506 for x64
#include <iostream>
#include <array>
int main()
{
std::array<int, 10> mas = { 1, 5, -4, 9, -6, -2, 7, 8, -5, 0 };
auto it = std::partition(mas.begin(), mas.end(), [](const int& i) { return i < 0; });
std::sort(mas.begin(), it, [](const int& x, const int& y) { return x > y; });
std::sort(it, mas.end(), [](const int& x, const int& y) { return x > y; });
std::copy(mas.begin(), mas.end(), std::ostream_iterator<int>(std::cout, " "));
}

using System;
using System.IO;

namespace FileApp
{
    class MainClass
    {
        private const string FILE_PATH = ""; //Запишите сюда путь к файлу
        private const string PHRASE = ""; //Запишите сюда заданный текст

        public static void Main(string[] args)
        {
            string[] rows = File.ReadAllLines(FILE_PATH);

            foreach (var row in rows)
            {
                //Если нужно сделать это все независимым к регистру, то раскоментируйте это и  закоментируйте вариант нижу
                //if(row.ToLower().Contains(PHRASE.ToLower()))
                //{
                //  Console.WriteLine(row);
                //}

                if (row.Contains(PHRASE))
                {
                    Console.WriteLine(row);
                }
            }
        }
    }
}