soma de números pares
Publicado por NewLinuxer 14/12/2005
[ Hits: 15.007 ]
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.
programa pra somar e tirar média
soma da diagonal principal de uma matriz
Achar o maior e o menor valor inserido pelo usuario
validando um triângulo e classificando-o como equilátero, isoceles ou escaleno.
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
O que você quer para sua vida ao usar o Linux?
Visualizar arquivos em formato markdown (ex.: README.md) pelo terminal
Dando - teoricamente - um gás no Gnome-Shell do Arch Linux
Audio intermitente xubuntu notebook positivo c14 vision (0)
Encontrar o comando completo de uma janela [RESOLVIDO] (2)
Instalação de Ubuntu em SSD (interno) como se fosse um dispositivo ext... (2)
Zorin OS - Virtual Box não consigo abrir maquinas virtuais (10)