Напишите программу. с помощью оператора цикла for рассчитайте произведение натуральных...

Question

Напишите программу. с помощью оператора цикла for рассчитайте произведение натуральных чисел от 1 до n. n=6​

Comments

begin Range(1, 6).Product.Println;end.

---

по условию задачи это совсем не то :)

Answer 1

var

   p : integer := 1;

   n : integer := 6;

begin

   for var i := 1 to n do p *= i;

   writeln(p);

end.

Comments

Это совсем не то

---

а что нужно то?

---

программа считает произведение натуральных чисел от 1 до 6 с помощью цикла for. Если это совсем не то то вопрос был задан совсем не верно.