1)Написать программку нахождения суммы квадратов чисел от 5 до 252) Дан

//PascalABC.NET версия 3.2, сборка 1389
//Если программа не запускается, то обновите версию
begin
    Writeln('суммa квадратов чисел от 5 до 25 =', Range(5, 25).Select(x -gt; x * x).Sum);
    writeln;
    
    var a := ArrGen(15, i -gt; ReadInteger('a[' + i.toString() + ']='), 1);
    writeln('творение частей массива, великих 5 =', a.Where(x -gt; x gt; 5).Aggregate(1, (x, y)-gt; x * y));
end.