soma de números pares
Publicado por NewLinuxer 14/12/2005
[ Hits: 15.117 ]
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.
mostrar a meior e a menor temperatura do ano com vetor
Como extrair chaves TOTP 2FA a partir de QRCODE (Google Authenticator)
Linux em 2025: Segurança prática para o usuário
Desktop Linux em alta: novos apps, distros e privacidade marcam o sábado
IA chega ao desktop e impulsiona produtividade no mundo Linux
Novos apps de produtividade, avanços em IA e distros em ebulição agitam o universo Linux
Como instalar o repositório do DBeaver no Ubuntu
Como instalar o Plex Media Server no Ubuntu
Digitando underscore com "shift" + "barra de espaços"
Como ativar a lixeira e recuperar aquivos deletados em um servidor Linux
Como mudar o nome de dispositivos Bluetooth via linha de comando
converter algoritmo C++ em C? (1)
Programa fora de escala na tela do pc (22)
Problemas com Driver NVIDIA (1)
Fedora KDE plasma 42 X Módulo de segurança BB (Warsaw-2) (1)









