Обработка и хранение информации.
Program klubnika
<span>var a,b : integer; </span>
<span>begin </span>
<span>writeln('введите общее количество клубники'); </span>
<span>readln(a); </span>
<span>writeln('введите количество клубники, которое собрала Вера'); </span>
<span>readln(b); </span>
<span>if a-b > b then writeln('Валя собрала больше клубники') </span>
<span>else if a-b < b then writeln('Вера собрала больше клубники') </span>
<span>else writeln('клубники было собрано поровну');</span>
<em>// PascalABC.NET 3.2, сборка 1338 от 16.11.2016</em>
begin
var b:=ArrRandom(10,-10,10); b.Println;
Writeln('Сумма элеменов массива равна ',b.Sum);
Writeln('Количество четных чисел равно ',b.Count(x->x.IsEven))
end.
Пример
1 10 3 -4 -10 -1 -6 0 -4 9
Сумма элеменов массива равна -2
Количество четных чисел равно 6
Если считать, что вместо A[i]=1+1 написано A[i]=i+1,
а вместо A[i]:=A[1-1] написано <span>A[i]:=A[i-1] (что скорее всего, иначе нужного ответа вообще нет), то после первого цикла получится массив
1 2 3 4 5 6 7 8 9 10 11,
а после второго - 1 1 1 1 1 1 1 1 1 1 1
Ответ: 3)
</span>
Что такое алгоритм?
Подскажите!!!!!