Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  a
Language: PASCAL
Code:
program media nota;
var
  a    : Byte;
begin
  writeln('Insira a primeira nota');
  Readln(N1);
  writeln('Insira a segunda nota');
  Readln(N2);
  writeln('Insira a terceira nota');
  Readln(N3);
  writeln('Insira a quarta nota');
  Readln(N4);
  media :=(n1+n2+n3+n4)/4;
  writeln('A media sera:');
end.          
          
Comments: