pires Algoritmo

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

Program Pzim ;
{ ------------------ existia um Begin aqui }
var
n1,n2,media:real;
Begin
media:=(n1+n2)/2;
read(n1,n2);
if media>=7 then
 begin
 writeln('safo heiw negaum',' ','media:');
 writeln(media);
 end
else
 begin
 writeln('tem que porrar negaum',' ','media:');
 writeln(media);
 end;
 
 End.