Pascal/Estrutura de repetição: diferenças entre revisões

[edição não verificada][edição verificada]
Conteúdo apagado Conteúdo adicionado
Linha 121:
write ('Nota 3: ');
read (N3);
MEDIA:=(N1+N2+N3)/3;
if (MEDIA >= 6) then
begin
MEDIA:=(N1+N2+N3)/3;
writeln('O aluno de nome ',NOME,' tem a média ',MEDIA,' em suas notas ');
end