média de uma turma
Publicado por NewLinuxer 13/12/2005
[ Hits: 4.188 ]
programa que recebe a primeira no e a segunda, armazenando-as em vetores separados, para 10 alunos, e ao final mostra a média de cada aluno.
program exercicio14; uses crt; Type vetor=array[1..10] of integer; var nota1, nota2: vetor; contador: integer; begin clrscr; For contador:= 1 to 10 do begin Write('Digite a primeira nota do aluno ',contador:2,': '); readln(nota1[contador]); end; writeln; For contador:= 1 to 10 do begin Write('Digite a segunda nota do aluno ',contador:2,': '); readln(nota2[contador]); end; writeln; For contador:= 1 to 10 do Writeln('A media do aluno ',contador,' e:',(nota1[contador]+nota2[contador])/2:2:2); readkey; end.
Gerador de senha Pascal/Lazarus
dizer se o aluno passou ou nao
Nenhum comentário foi encontrado.
Compartilhando a tela do Computador no Celular via Deskreen
Como Configurar um Túnel SSH Reverso para Acessar Sua Máquina Local a Partir de uma Máquina Remota
Configuração para desligamento automatizado de Computadores em um Ambiente Comercial
Como renomear arquivos de letras maiúsculas para minúsculas
Imprimindo no formato livreto no Linux
Vim - incrementando números em substituição
Efeito "livro" em arquivos PDF
Como resolver o erro no CUPS: Unable to get list of printer drivers
Não to conseguindo resolver este problemas ao instalar o playonelinux (1)
Excluir banco de dados no xampp (1)
[Python] Automação de scan de vulnerabilidades
[Python] Script para analise de superficie de ataque
[Shell Script] Novo script para redimensionar, rotacionar, converter e espelhar arquivos de imagem
[Shell Script] Iniciador de DOOM (DSDA-DOOM, Doom Retro ou Woof!)
[Shell Script] Script para adicionar bordas às imagens de uma pasta