Консультация № 144268
18.09.2008, 07:59
0.00 руб.
0 1 1
Даны действительное число а, натуральное число n. Вычислить: а(а + 1)...(a + n - 1);

Обсуждение

Неизвестный
18.09.2008, 08:33
общий
это ответ
Здравствуйте, Николаев Денис Игоревич!
Код в приложении.
Сначала вводится a, затем n.

Приложение:
var
a, itog: real;
i, n: integer;
begin
//1
Readln(a);
Readln(n);
itog:= 1;
for i:= 0 to n-1 do
itog:= itog * (a + i);
writeln(itog);
end.
Форма ответа