Регистрация
Bogura
11.04.2022 00:20
Информатика
Есть ответ 👍

Дано целое число n (> 0). найти произведение n! =1*(в delphi.7 )

142
189
Посмотреть ответы 2

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

mira132
mira132
4,4(20 оценок)
{$apptype console} var     f: real;     n: integer; begin write('n = '); readln(n); f: =1; for n: = 1 to n do       f: =f*n; write(n,'! = ',f); readln end.
ramn
ramn
4,7(32 оценок)
Вообще -  то в одном терабайте 2³⁰ кбайт. только такого варианта среди предложенных нет.

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