Умножение в массиве Опции

[Странница]

Мне дан массив d[j] от 1 до 7, и мне надо перемножить все числа этого массива, мне нужен только этот кусочек остальная программма готова...плиииз!!!!!!

[volvo]

мне нужен только этот кусочек

Ну-ну...

...
p := 1;
for j := 1 to 7 do p := p * d[j];
...

Только не спрашивай, какого типа должны быть переменные... У тебя же все остальное есть? Значит и описания переменных должны быть...

Точно так же я тебя не спрашиваю, КАКОГО типа у тебя массив (может, это массив строк, откуда мне знать?)...