[Source] Calculadora de notas em Pascal

Postagem de conteúdo sobre programação pascal e delphi
Post Reply
User avatar
WhiteHat
Membro
Membro
Posts: 30
Joined: Tue Feb 06, 2018 10:40 pm

[Source] Calculadora de notas em Pascal

Post by WhiteHat » Wed Feb 07, 2018 4:55 pm

Code: Select all

program calculo_de_media_das_provas;

uses crt;

var aluno:string;
    nota1,nota2,media:real;


    begin
    clrscr;
    writeln('digite o nome do aluno');
    readln(aluno);
    writeln('digite nota1 ');
    readln(nota1);

    writeln('digite nota2 ');
    readln(nota2);

    media:=((nota1+nota2)/2);
    writeln(media:0:0);




    end.



Post Reply

Return to “Pascal / Delphi”