programa para selecionar os números em posições impares em array de 19 espaços e calcular a media
Publicado por NewLinuxer 12/12/2005
[ Hits: 8.420 ]
este programam demonstra como é possível selecionar o conteúdo dos vetores de forma a trabalhar com apenas uma parte dos itens, neste caso é calcula a média de todos os números informados nas posiçoes impares
Program exercicio10;
uses crt;
Type
  Vetor = array[1..19] of integer;
Var
  vet : Vetor;
  soma,soma2, contador : integer;
Begin
  clrscr;
  For contador := 1 To 19 do
  begin
    write('Informe o ',contador:2,'§ numero: ');
    readln (vet[contador]);
    if (contador mod 2) <> 0 then
    begin
      soma:=soma+1;
      soma2:=soma2+vet[contador];
    end;
  end;
  writeln;
  writeln('A media dos numeros das posicoes impares informados e: ',
           soma2/soma:0:2);
  Readkey;
end.
armazenar o nome de um aluno e suas notas
Operações básicas da matemática
Nenhum comentário foi encontrado.
IA Turbina o Desktop Linux enquanto distros renovam forças
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
Atualizando o Fedora 42 para 43
Como saber se o seu e-mail já teve a senha vazada?
Como descobrir se a sua senha já foi vazada na internet?
Instalação dualboot Windows 11 e Debian 13 (0)
Programa fora de escala na tela do pc (33)
Eu queria adicionar a incon do wifi e deixa transparente no fluxbox no... (0)









