Question

Se dau numerele a si b alcătuiti un program care sa afișeze pe ecran enuntul True daca media aritmetică este divizibila cu 2.Ajutatima va rog.(pascal)

Answer 1

program media;

var a, b:real;

   m:real;

begin

 write('a='); read(a);

 write('b='); read(b);

 m:=(a+b)/2;

 if (m/2=int(m)/2) then write(true)

 else write(false);

end.