Составить программу вычисления значений функции...

Question

Составить программу вычисления значений функции F:=(B/(sqrt(sin(a*pi/180))*sqr(X)*exp(-Y/A))) pascal

Answer 1

var A,B,X,Y:real;
begin
    writeln('vvedi A, B, X, Y');
    readln(A,B,X,Y);
    writeln('A=',A,' B=',B,' X=',X,' Y=',Y);
    writeln('F=',(B/(sqrt(sin(a*pi/180))*sqr(X)*exp(-Y/A))));
end.

Comments

внешний цикл с предусловием и внутренний цикл с параметром нужен

---

сразу нужно было всё указывать в формулировке вопроса. И какой ещё цикл? Задача не требует цикла в данной формалировке

---

могу задание отправить

---

не надо. Сразу нужно было всё правильно делать. 

---

и на этом спасибо)