Дано целое число n ( 0). найти произведение n! =1*(в - вопрос №0177734921 от kaban229 13.02.2023 04:26

Question

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

kaban229 · Answer

{$APPTYPE CONSOLE}Var   F:real;   N:integer;BeginWrite( N = );ReadLn(N);F:=1;For N:= 1 to N do    F:=F*N;Write(N, ! = ,F);ReadLnEnd....

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