Дано два целых числа. Написать программу, определяющую среднюю арифметическую этих чисел. Результат напечатать с двумя числами после запятой.

Question

Информатика

Маня

20 марта, 04:57

Дано два целых числа. Написать программу, определяющую среднюю арифметическую этих чисел. Результат напечатать с двумя числами после запятой.

+3

Ответы (2)

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

Алина · Answer 1

Var a, b: real;

begin

read (a, b) ;

write ((a + b) / 2 : 0 : 2)

end.

Полинария · Answer 2

Begin

Var k, l, m : integer;

var v: double;

writeln ('Введите два цисла') ;

ReadLn (k) ;

ReadLn (l) ;

v: = (k+l) / 2;

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

end.