Buscar

alguem sabe resolver em pascal?

escreva uma funcao que receba vetor 30 de elementos inteiros e retorne a a quantidade de números positivos do vetor v

💡 5 Respostas

User badge image

Renato S Monteiro

Qual o codigo?

0
Dislike0
User badge image

Renato S Monteiro

pega o mesmo codigo mais em outra linguagem e troca os codigos, pq pascal.. procurei e não achei absulutamente nada

0
Dislike0
User badge image

Andre Smaira

Program vetor30;

uses crt;

var i : integer;

var vetor: array[0..29] of integer;

var contagem: integer;

Begin

for i:= 0 to 29 do

Begin

write (‘Informe os valores:’);

read (vetor(i));

End

contagem := 0;

for i:= 0 to 29 do

Begin

if ((vetor [i] mod (2) == 0) do

contagem := contagem + 1;

End

0
Dislike0

Faça como milhares de estudantes: teste grátis o Passei Direto

Esse e outros conteúdos desbloqueados

16 milhões de materiais de várias disciplinas

Impressão de materiais

Agora você pode testar o

Passei Direto grátis

Você também pode ser Premium ajudando estudantes

✏️ Responder

SetasNegritoItálicoSublinhadoTachadoCitaçãoCódigoLista numeradaLista com marcadoresSubscritoSobrescritoDiminuir recuoAumentar recuoCor da fonteCor de fundoAlinhamentoLimparInserir linkImagemFórmula

Para escrever sua resposta aqui, entre ou crie uma conta

User badge image

Outros materiais

Outros materiais