Question

СРОЧНО ПОМОГИТЕ
построить блок системы для решения задачи даны 3 числа найти их среднее арифм
Sap=(a+b+c)/3

Answer 1

Ответ:

var  a, b, c: integer;  s: real;

begin

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

readln(a);

readln(b);

readln(c);

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

writeln(s);

end.