数组（50个数）连乘怎么写？

长歌行

数组（50个数）连乘怎么写？


补充内容 (2025-8-21 13:28):
数组（50个数）连乘或连加怎么写？

技术008

variable:n[50]=1;
a:=1;
for i=1 to 50 do
begin
        a:=a*n[i];
END
cc:a;

长歌行

谢谢

长歌行

   请你帮我改对，谢谢 ，正确答案210 ：
   variable:
   
   data[4] = 1 ;

   a:=1;



data[4] := ( 2,  3, 5 ,7 ) ;



for i=1 to 4 do

begin

               a := a * data[i] * data[i+1];
END

cc: a  , VOLSTICK  ;     
        

技术008

variable:data[4] := ( 2,  3, 5 ,7 ) ;


a:=1;
for i=1 to 4 do

begin

               a := a * data[i];
END

cc: a  , VOLSTICK  ;  

长歌行

技术008 发表于 2025-8-21 16:10
variable:data[4] := ( 2,  3, 5 ,7 ) ;

谢谢