Есть ответ 👍

Вычислить значение n! ( n - натуральное, цикл until )

276
284
Посмотреть ответы 2

Ответы на вопрос:


Var i,f,n: integer; begin readln(n); i: =0; f: =1; repeat i: =i+1; f: =f*i; until i< n; write(f); end.

Приблизительно ≈0,643656

Популярно: Информатика