Website and domain for sale:

Napishite the program which calculates the sums of elements of the A[1:50] array filled with numbers 1,3,5,7,9

Var A: array [1. 50] of integer; i, S: integer; Begin Write (Initial massif:); For i: = 1 to 50 do Begin A[i]: = 2*i-1; Write (A[i]); S: = [S+Ai]; End; WriteLn (S =, S) End.
Answer add