Фрагментвидаp := 1; for i := 1 to int(n/2) do p := p*x[i]; находит произведение:
- всех целых чисел ряда x[1], x[2], …, x[n]
- всех чисел первой половины ряда x[1], x[2], …, x[n]
- всех чисел ряда x[1], x[2], …, x[n]
Для просмотра статистики ответов нужно
залогиниться.