Теперь Кью работает в режиме чтения

Мы сохранили весь контент, но добавить что-то новое уже нельзя

Помогите пожалуйста. Задачка по программированию. Сделать на PascalABC.NET. Под буквой "Е". Как показать эту формулу?

Программирование в паскаль
Геворк Егоян
  ·   · 791
Интересуюсь IT, учусь на Мехмате ЮФУ  · 30 дек 2022  · u-pov.ru
## 
/// Функция считает факториал числа
function fact(n: integer): integer;
begin
  result := 1;
  for var i := 2 to n do result *= i;
end;

var n := readinteger('Введите кол-во членов произведения:');
var x := readreal('Введите X:');
var prod := 1.0;
for var k := 1 to n do
begin
  prod *= ((1 - x)**(k + 1) + 1) / (fact(k - 1) + 1) ** 2;
end; 
println('prod =', prod);
UserPOV - об IT с точки зрения пользователяПерейти на u-pov.ru