Даны два числа a b найти среднее арифметическое
Даны два числа a b найти среднее арифметическое
Гость
Ответ(ы) на вопрос:
Гостьсреднее арифметическое: (a+b)/2
ГостьPascalABC var
a,b:real;
begin
readln (a,b);
writeln ('среднее арифметическое = ', (a+b)/2);
readln;
end.
Не нашли ответ?
Похожие вопросы