помлгите срочном нужно составить программу для произведения чисел натурального ряда

Задание недоопределено, непонятно с 1 или с любого числа вычислять, непонятно, последовательных чисел или произвольных.

Я предложу решение следующей задачи

Составить программу вычисления произведения ПОСЛЕДОВАТЕЛЬНЫХ чисел натурального рада, начиная с N1, заканчивая N2. N1 и N2 вводятся с клавиатуры. 

Решение будет такое

П=1;  // здесь будем накапливать наше произведение

Ввод(N1, N2);

Если N2<N1 Тогда

    Сообщить("Неверные исходные данные!");

     Возврат;

КонецЕсли;

Для ц=N1 по N2 цикл

      П=П*ц;

КонецЦикла;

Сообщить("Произведение от "+N1+" до "+N2+" равно "+П);

Всё!

Ты не указал язык, которым владеешь, поэтому код написал на псевдоязыке, который ты без проблем переведёшь на известный тебе.

Успехов! В следующий раз более корректно и внимательно формулируй условие задачи.