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

Bklbgnk Bklbgnk    2   29.05.2019 14:00    0

Ответы
АлисаСелезнёва1 АлисаСелезнёва1  28.06.2020 17:03
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика