// PascalABC.NET 3.1, сборка 1200 от 13.03.2016
begin
var a:=ArrRandom(10,-5,15); a.Println;
Writeln('Сумма элементов ',a.Sum);
Writeln('Количество четных элементов ',a.Where(x->x.IsEven).Count)
end.
<u><em>Тестовое решение:</em></u>
-3 4 10 1 2 6 8 7 10 14
Сумма элементов 59
Количество четных элементов 7
Program n1;
Var E, a: Real;
N, i: Integer;
Begin
Write('N='); ReadLn(N);
E:=1;
For i:=1 To N Do
Begin a:=a/i;
E:=E+a
End;
WriteLn('E=', E)
End.
Объекты Базы Данных , их хранение СУБД Access ориентирована на работу с объектами Базы Данных , к которым относятся таблицы, запросы, формы, отчеты, страницы, макросы и модули.