program 3var;
uses math;
var
a, z: real;
begin
writeln('Vvedite a - ');
readln(a);
z:=sqrt((2*a+sin(abs(3*a)))/3.5 // тут либо точка, либо запятая, не помню
writeln('Otvet - ', z);
readln();
end
program 3var;
uses math;
var
a, z: real;
begin
writeln('Vvedite a - ');
readln(a);
z:=sqrt((2*a+sin(abs(3*a)))/3.5 // тут либо точка, либо запятая, не помню
writeln('Otvet - ', z);
readln();
end