Pessoal, será que alguém poderia me ajudar com estes exercícios?
Uso o Pascal zim.
1) Entrar com vários números e imprimir quantos números foram digitados.
2) Criar um algoritmo que entre com vários números inteiros e positivos e informe a quantidade de números múltiplos de 3. O programa será encerrado quando o usuário digitar o zero, ou menos.
3)Criar um algoritmo que entre com vários números inteiros e positivos e informe a média dos números múltiplos de 3. O programa encerra quando o usuário digitar zero, ou menos.
More Questions From This User See All
Answers & Comments
Verified answer
Program Oi;
var
n,n1: integer;
begin
n1 = 0;
repeat
begin
readln(n);
if n mod 3 = 0 then //verificando se o numero digita é multiplo de 3
begin
n1 = n1 + 1; // caso seja, incrementar 1 na variavel
end
end
until( n <=0 ) // repita até que o numero seja <=0, ou seja quando a pessoa digitar por exemplo -1 o programa para de pedir o numero e mostra n1, que esta guardada a quantidade de numeros multiplos de 3
writeln("Quantidade de numeros divisiveis por 3",n1);
End.
Cara Faz um tempinho que nao mexo com Pascal, por isso deve ter uns errinhos, fiz mesmo pra você intender, por favor não de Ctrl+C, leia intenda e faça o seu Ok, esse tem grande chances de dar erro, mas a lógica é essa.
Função MOD.
Retorna o resto da divisão por determinado numero. EX:
15 Mod 3 = 0
15 divido por 3 não sobra resto ou seja é um multiplo de 3.
31 mod 3 = 1
Na divisao de 31 por 3 sobra 1, portanto 31 não e um multiplo de 3
Espero ter ajudado (Y).
primeiro respode essa aki óóóóóó http://br.answers.yahoo.com/question/index;_ylt=As...