1. Даны действительные число аи натуральное число n. Вычислить Р = а (а + 1)...(а + n -1)
1. Даны действительные число аи натуральное число n. Вычислить
Р = а (а + 1)...(а + n -1)
Гость
Ответ(ы) на вопрос:
Гостьvar
a, P: real;
n, i: integer;
begin
P := 1;
readln(a, n);
for i := 0 to n - 1 do
P *= a + i;
writeln(P);
end.
Не нашли ответ?
Похожие вопросы