Cáculo de Fatorial, utilizando-se de Repeat - Until
Publicado por NewLinuxer 14/12/2005
[ Hits: 10.332 ]
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.
cadastro de multiplos clientes com registro
Script que verifica se um número é primo ou não
Extenso em dll, com parâmetros adicionais
Nenhum coment�rio foi encontrado.
Customizar a Instalação do Linux Debian com Preseed
Atualizando o Passado: Linux no Lenovo G460 em 2025
aaPanel - Um Painel de Hospedagem Gratuito e Poderoso
Um modo leve de ouvir/ver áudio/vídeo da internet em máquinas pererecas
Resolver algumas mensagens de erro do SSH
Instalar módulo de segurança do Banco do Brasil Warsaw do tipo .run
Bora fazer um teste? mbti (12)
Linux Debian 11 Bullseye Reiniciando Sozinho (1)
Possível Migração de windows para linux ???? (pc da empresa) (2)