Media aritmetica a doua valori intregi
31. Se citesc două valori întregi a şi b. Tipăriţi media lor aritmetică.
program pd31;{media aritmetica a doua valori}
var a,b:integer;
begin
write('a=');readln(a);
write('b=');readln(b);
writeln('media aritmetica a celor doua valori este ma= ',(a+b)/2:4:2);
readln;
end.
program pd31;{media aritmetica a doua valori}
var a,b:integer;
begin
write('a=');readln(a);
write('b=');readln(b);
writeln('media aritmetica a celor doua valori este ma= ',(a+b)/2:4:2);
readln;
end.
Comentarii
Trimiteți un comentariu