program n_1;
var S:integer;
begin
S:=(sqr(2)+sqr(4)+sqr(6)+sqr(8)+sqr(10));
writeln(S);
end.
sqr(i) - sqr это возведение числа во вторую степень, а i само число
//PascalABC.NET версия 3.2, сборка 1467
//Если программа не запускается, то обновите версию
begin
var m := ArrRandomReal(5, 1, 10); // автоматический ввод данных
Println(m);
Println(m.Aggregate(1.0, (x, y)-> x * y));
end.
Function Sum(m: myarray): Integer
Var i, s : integer
sum:=0
For i:=1 To n do
(к уже найденной сумме первых (i-1) элементов прибавляем i-ый элемент)
s:=s+m[i];
sum:=s;
End;
Это все что я помню...
Что значит из строки? Формулируйте лучше. Можно делать через обычный массив, примерно так
var