Respostas

A melhor resposta!
2014-06-29T23:49:41-03:00
Program media;

var valor1, valor2, valor3, valor4 : integer;
    media : real;

begin
      write('digite o valor 1: ');
      readln(nota1);
      write('digite o valor 2: ');
      readln(nota2);
      write('digite o valor 3: ');
      readln(nota3);
      write('digite o valor 4: ');
      readln(nota4);
     
      media := (valor1 + valor2 + valor3 + valor4) / 4;

      writeln('Media = ', media:6:2);

      readln();
end.

1 5 1