Даны числа А, В, С. Найти среднее значение заданных чисел М.

Question

Информатика

Савелий

18 сентября, 13:25

Даны числа А, В, С. Найти среднее значение заданных чисел М.

+5

Ответы (2)

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

Евдоксия · Answer 1

Program gt;

var a, b, c, m:real;

begin

readln (a, b, c) ;

m: = (a+b+c) / 3;

writeln (m:1:6) ;

end.

Марьяха · Answer 2

Program test;

var a, b, c, m:real;

begin

write ('Введите А: ') ;

readln (a) ;

write ('Введите B: ') ;

readln (b) ;

write ('Введите C: ') ;

readln (c) ;

m: = (a+b+c) / 3;

writeln ('Среднее значение чилел (', a,', ', b,', ', c,') : ', m:2:2) ;

end.