Question

Se considera 3 numere intregi, a,b,c sa se scrie un program care calculeaza media a acestor numere.. In PASCAL

Answer 1

Răspuns:

var

 a, b, c, d: integer;

 m: real;

begin

 

 writeln('Introduce trei numere:');

 readln(a, b, c);

 d := a + b + c;

 writeln('Rezultatul este=', d);

 m := d / 3;

 writeln('Media aritmetica a numerelor=', m:5:2);

 

end.