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

Question

Информатика

Никитична

17 марта, 02:41

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

+5

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