В одномерном массиве найти произведение первых n элементов

В одномерном массиве а(10) найти произведение первых n элементов. решить в байсике)
CLS
Randomize Timer
DIM a(10)
S=1
for i=1 to 10
a(i)=int(rnd*10)
что дальше?
2 ответа

CLS
RANDOMIZE TIMER
DIM A(10)
RET:
INPUT "Skol'ko pervyh elementov peremnojit'? ", C
IF C > 10 THEN GOTO RET
S = 1
FOR I = 1 TO 10
A(I) = INT(RND * 10)
IF C >= I THEN
S = S * A(I)
END IF
PRINT A(I)
NEXT
PRINT "==========================================="
PRINT "Proizvedenie: "; S


Памирыч, ты, конечно, чувак, но, извини, ты пишешь фигню. Это примитивная задача
input  n
s=1
for i=1 to n
s=s*a(i)
next
print s
а ввод элементов читайте вверху, в важном.