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

Question

Информатика

Елизаветка

6 февраля, 21:18

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

+4

Ответы (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.