Определите элементы одномерного вещественного массива Х.
Напишите программу, позволяющую создать новый массив по следующему описанию:
х1, х1+х2, …, х1+х2+х3+…хn
Язык Паскаль.
Ответы
Ответ дал:
0
// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
for var i:=1 to a.Length-1 do a[i]+=a[i-1];
a.Println;
end.
Пример
n= 17
78 -74 -62 -11 43 -63 99 50 -68 -87 8 93 -26 -57 2 -97 23
78 4 -58 -69 -26 -89 10 60 -8 -95 -87 6 -20 -77 -75 -172 -149
Вас заинтересует
1 год назад
5 лет назад
8 лет назад
9 лет назад