Найти среднее арифметическое трех чисел a, d, c. На языке паскаля

Question

Информатика

Минай

14 августа, 14:19

Найти среднее арифметическое трех чисел a, d, c. На языке паскаля

+3

Ответы (1)

Знаете ответ на вопрос?

Андрона · Answer 1

Program zadanie;

Var a, b, c:real;

Begin

Writeln ('Введите значения a, b, c') ;

Readln (a, b, c) ;

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

Writeln ('Среднее арифметическое чисел a, b, c=', a) ;

End.