Из элементов массива А сформировать элементы массива В по правилу: B[i]=A[1]+A[2]+...+A[i]. Напишите пожалуйста!!!
Из элементов массива А сформировать элементы массива В по правилу: B[i]=A[1]+A[2]+...+A[i].
Напишите пожалуйста!!!
Гость
Ответ(ы) на вопрос:
ГостьVar
A,B:array[1..13] of integer;
i,j:integer;
Begin
Write('A: ');
For i:= 1 to 13 do
Begin
A[i]:=random(13)+1;
Write(A[i],' ')
End;
WriteLn;
Write('B: ');
For j:= 1 to 13 do
Begin
For i:= 1 to j do
B[j]:=B[j]+A[i];
Write(B[j],' ')
End
End.
Не нашли ответ?
Похожие вопросы