soma de números pares
Publicado por NewLinuxer 14/12/2005
[ Hits: 14.847 ]
Programa para fazer a soma de todos os números pares entre dois números definidos pelo usuário
Program Exemplo; {Programa para fazer a soma de todos os n£meros pares entre dois n£meros definidos pelo usu rio} uses crt; Var par,numero_1,numero_2,soma: integer; Begin ClrScr; soma:=0; Write('Primeiro n£mero--------> '); Readln(numero_1); Write('Segundo n£mero---------> '); Readln(numero_2); par:=numero_1; If par mod 2 <> 0 then par:=par+1; Repeat soma:=soma+par; par:=par+2; Until par>numero_2; Writeln('A soma dos n£meros pares entre '); WriteLn(numero_1,' e ', numero_2,' ',soma); readkey; End.
script para ler um vetor e mostrar o conteúdo
cadastro de um cliente com registro
Enviar mensagem ao usuário trabalhando com as opções do php.ini
Meu Fork do Plugin de Integração do CVS para o KDevelop
Compartilhando a tela do Computador no Celular via Deskreen
Como Configurar um Túnel SSH Reverso para Acessar Sua Máquina Local a Partir de uma Máquina Remota
Configuração para desligamento automatizado de Computadores em um Ambiente Comercial
Criando uma VPC na AWS via CLI
Multifuncional HP imprime mas não digitaliza
Dica básica para escrever um Artigo.
Como Exibir Imagens Aleatórias no Neofetch para Personalizar seu Terminal
Melhorando a precisão de valores flutuantes em python[RESOLV... (15)
Mint começou a apresentar varios erros (2)
Recuperar arquivos de HD em formato RAW usando Linux (1)