Question

Срочно помогите составить блок схему и программу

Answer 1

Вводишь А и Х- получаешь Y.
var
a,x,y:real;
begin
writeln('Введите A и X');
readln(a,x);
y:=(sqr(x)+sqr(a))/(1-sin(ln(sqr(x))));
writeln('Y = ',y);
end.