|
zadach9.BAS |
|
{* Задача9 *}REM basic ' Cформировать массив Y(1)=X(1)+X(N), Y(2)=X(2)+X(N-1), Y(3)=X(3)+ X(N-2) и.т.д (N – четное);10 INPUT N
20 Dim X(N), Y(N/2)
30 For I=1 To N
40 INPUT X(I)
60 Next I
70 For I=1 To N/2
80 Y(I)=X(I)+X(N-I+1)
90 PRINT Y(I)
100 Next I
110 End
|