Cáculo de Fatorial, utilizando-se de Repeat - Until
Publicado por NewLinuxer 14/12/2005
[ Hits: 10.312 ]
programam pra efetuar Cáculo de Fatorial, utilizando-se de Repeat - Until
Program Exemplo; {C culo de Fatorial, utilizando-se de Repeat - Until} uses crt; Var numero,cont: integer; fatorial:real; Begin ClrScr; fatorial:=1; Write('Digite o n£mero do qual se deseja o fatorial: '); Readln(numero); {C lculo do Fatorial} cont:=numero; Repeat fatorial:=fatorial*cont; cont:=cont-1; Until cont<2; Writeln('O fatorial de ',numero,' : ',Fatorial:0:0); readkey; End.
Extenso em dll, com parâmetros adicionais
Nenhum coment�rio foi encontrado.
Atualizando o Passado: Linux no Lenovo G460 em 2025
aaPanel - Um Painel de Hospedagem Gratuito e Poderoso
O macete do Warsaw no Linux Mint e cia
Visualizar arquivos em formato markdown (ex.: README.md) pelo terminal
Dando - teoricamente - um gás no Gnome-Shell do Arch Linux
Como instalar o Google Cloud CLI no Ubuntu/Debian
Mantenha seu Sistema Leve e Rápido com a Limpeza do APT!
Procurando vídeos de YouTube pelo terminal e assistindo via mpv (2025)
Jogos baixados na Central de Aplicativos mas que não abrem (1)
debian com wayland, configuracao de teclado. Mudou Tudo! [RESOLVIDO] (1)
Iinstalar o Scanner Kodak i940 no Linux Mint 19/20? (3)
Pastas da raiz foram para a área de trabalho [RESOLVIDO] (11)