Николай Кирчев
Николай Кирчев

2. Дано целое число N (> 0). Найти произведение1.1 • 1.2 • 1.3 • …(N сомножителей) . это в паскале нужно сделать,

Дано целое число N (> 0). Найти произведение
1.1 • 1.2 • 1.3 • …
(N сомножителей) .
это в паскале нужно сделать,

Ми
Миша

program z1;
const
n = 10;
var
x, i, result1:real;
begin
x:=1.1;
result:=1;
i:=n;
while i>0 do
begin
result:=result*x;
x:=x+0.1;
i:=i-1;
end;
writeln('result = ',result);
end.

Похожие вопросы
дано натуральное число n вычислить сколько цифр в числе n и чему равна сумма его цифр паскаль
дано натуральное число n>1 найти количество его делителей. В паскале с циклом for
Дано целое число N(>0)используя 1 цикл найти сумму 1!+2!+,,+N! и вывести результат как вещественное число
дано целое число N (>0). Найти квадрат данного числа, используя для его вычисления следующую формулу:
Дано целое число N (>0). Найти сумму N^2+(N+1)^2+(N+2)^2+...+(2*N)^2
задано натуральное число n. Найти сумму цифр данного числа с помощью функции !!!(паскаль)
Паскаль. Даны четыре целых числа. Найти произведение положительных и отрицательных чисел.
Дано натуральное число n. Вычислить 1+2+4+6…n Чуть что это паскаль.
Дано вещественное число A и целое число N. Найти первое число в степени второго!
Паскаль, нужно вывести через пробел N случайных целых чисел, дано N.