Media dos Alunos
Publicado por Perfil removido 26/03/2006
[ Hits: 4.907 ]
Este programa soma as notas de 4 provas e divide por 4, se a média for menor ou igual a 5 o aluno está reprovado se for maior ele está aprovado :) este é um bom exemplo para aprender o if e else, ahhhh e alem do mais ele tem alguns "efeitos especiais" (algumas cores hehe)
até mais galera
//Programa mediaAlunos // Este programa soma as notas de 4 provas e divide por 4, se a média for menor ou igual a 5 o aluno está reprovado // se for maior ele está aprovado :) // Desenvolvido por Alexandre Pina - alexandrehkk@gmail.com // Program mediaAlunos ; Var p1,p2,p3,p4: Integer; Media: Integer; Begin textcolor (yellow); writeln ( '.: Media dos Alunos :.'); textcolor (07); writeln ( '' ); writeln ( 'Digite a nota da primeira prova, p1'); read(p1); writeln ( 'Digite a nota da segunda prova, p2'); read(p2); writeln ( 'Digite a nota da terceira prova, p3'); read(p3); writeln ( 'Digite a nota da quarta prova, p4'); read(p4); media:=(p1+p2+p3+p4)div 4; If (media <=5) then Writeln ( 'Voce está de recuperação :( sua media foi ', media) else Writeln ( 'Parabens CDF, Você passou de ano :) sua média é ', media); readkey; End.
Calculadora De Decimo Terceiro Salário feita no Lazarus (Delphi 7 para Linux)
vendas de uma empresa em matriz
Cronômetro feito no Lazarus(Delphi 7 para Linux)
Nenhum comentário foi encontrado.
Atenção a quem posta conteúdo de dicas, scripts e tal (1)
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 (4)
Lançado Ubuntu 24.04 Final (0)
ASRock H310CM-HG4 vs Linux (11)