Buscar

pascal program Calcula_Media; var nome: string; nota1, nota2, nota3, media: real; begin writeln('Digite o nome do aluno:'); readln(nome);...

pascal

program Calcula_Media;


var

nome: string;

nota1, nota2, nota3, media: real;


begin

writeln('Digite o nome do aluno:');

readln(nome);

writeln('Digite a primeira nota:');

readln(nota1);

writeln('Digite a segunda nota:');

readln(nota2);

writeln('Digite a terceira nota:');

readln(nota3);

media := (nota1 + nota2 + nota3) / 3;

writeln('Aluno: ', nome);

writeln('Média: ', media:0:2);

if media >= 7 then

writeln('Aprovado!')

else

writeln('Reprovado!');

readln;

end.

```



💡 1 Resposta

User badge image

Ed Verified user icon

O programa em Pascal apresentado é um exemplo de como calcular a média de um aluno e verificar se ele foi aprovado ou reprovado. O programa solicita o nome do aluno e as três notas, calcula a média e exibe o resultado com uma mensagem de aprovação ou reprovação, dependendo da média obtida. Para executar o programa, basta copiar o código e colá-lo em um compilador Pascal, como o Turbo Pascal ou o Free Pascal, e depois executá-lo.

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


✏️ 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

Perguntas relacionadas

Materiais relacionados

Materiais recentes

Perguntas Recentes