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.109 ]
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.
mais um modelo de programa com vetor
Existência de triângulo, em Pascal
Nenhum comentário foi encontrado.
Agora temos uma assistente virtual no fórum!!! (247)
Manutenção de sistemas Linux Debian e derivados com apt-get, apt, aptitude e dpkg
Melhorando o tempo de boot do Fedora e outras distribuições
Como instalar as extensões Dash To Dock e Hide Top Bar no Gnome 45/46
Como Atualizar Fedora 39 para 40
Instalar Google Chrome no Debian e derivados
Consertando o erro do Sushi e Wayland no Opensuse Leap 15
Instalar a última versão do PostgreSQL no Lunix mantendo atualizado
Flathub na sua distribuição Linux e comandos básicos de gerenciamento
iso de sistema 32 bit em atividade (15)
Como transfiro os pokemons do fire red para o emulador mupen64? (1)
redirecionando saida de comando touch para o AWK[AJUDA] (2)