Даны два числа a и b. Найти среднее арифметическое: (a+b) / 2!

Question

Информатика

Иола

7 апреля, 02:56

Даны два числа a и b. Найти среднее арифметическое: (a+b) / 2!

+1

Ответы (2)

Знаете ответ?

Флёна · Answer 1

Var a, b, z: real;

begin

write ('Введите два целых числа, разделяя их пробелом: ') ;

readln (a, b) ;

z: = (a+b) / 2;

writeln ('Среднее арифметическое равно ', z) ;

end.

Ксюра · Answer 2

Var a, b, c:integer;

begin

readln (a, b) ;

c: = (a+b) / 2;

writeln (c) ;

end.