Паскаль. Помогите срочно d=(B+C)/2a

Question

Паскаль. Помогите срочно
d=(B+C)/2a

Answer 1

Var a,b,c,d:real;
begin
writeln('Введите a, b, c:');
readln(a,b,c);
d:=(b+c)/(2*a);
writeln('d = ',d);
end.

Пример:
Введите a, b, c:
5 7 2
d = 0.9

Comments

Большое спасибо, просто выручил)

Answer 2

Программа в файле
==================