Задание 1

ЗАДАНИЕ 1

К значениям нечетных элементов массива А(10) прибавить 1:

CLS

DIM A(10)

FOR I=0 TO 10

A(I)=INT(RND(1)*20-10)

PRINT A(I);

NEXT

FOR I=1 TO 10 STEP 2

A(I)=A(I)+1

NEXT

PRINT

FOR I=0 TO 10

PRINT A(I);

NEXT

END

ЗАДАНИЕ 2

Сформировать массив В, состоящий из 11 элементов по правилу:

Bi=Ai-i  i - четные

Bi=Ai/i  i – нечетные

CLS

DIM A(10), B(10)

FOR I=0 TO 10

A(I)=INT(RND(1)*20-10)

PRINT A(I);

NEXT

FOR I=0 TO 10 STEP 2

B(I)=A(I)-I

NEXT

FOR I=1 TO 10 STEP 2

B(I)=A(I)/I

NEXT

PRINT

FOR I=0 TO 10

PRINT B(I);

NEXT

END

ЗАДАНИЕ 3

Задан массив А, содержащий 11 элементов. Требуется вычислить сумму положительных и количество отрицательных элементов массива.

CLS

DIM A(10)

FOR I=0 TO 10

A(I)=INT(RND(1)*20-10)

PRINT A(I);

NEXT

S=0

N=0

FOR I=0 TO 10

IF A(I)<0 THEN N=N+1 ELSE S=S+A(I)

NEXT

PRINT

PRINT «S=»;S,  «N=»;N

END