Срочно ребят!! Нужно написать язык программирования Паскаль (Program begin writeln) . Вот...

Question

Срочно ребят!!
Нужно написать язык программирования Паскаль (Program begin writeln) . Вот :

---

Comments

Пожалуйста, загрузите более качественное изображение.

---

Вот : a= bcd/√R+1*(2b)-3c^2

---

ты сам ответил на свой вопрос

---

надо писать входные данные

---

???

Answer 1

Var  a, b, c, d, R : real;  
begin   

Writeln ('Введите b');
Readln (b);

Writeln ('Введите c');
Readln (c);
Writeln ('Введите d');
Readln (d);

Writeln ('Введите R');
Readln (R);

a:=b*c*d/sqrt(R+1)*(2*b)-3*c*c; 
Writeln ('A = ', a);

end.  

Comments

Если просто надо решить уравнение без входных данных, то просо убери часть кода, где просят ввести данные

Answer 2

Readln(b, c, d, R);
a := ((b*c*d)/(sqrt(R)+1))*(2*b)-3*sqr(c);
writeln(a);