PascalABC.NET
Версия 3.3. сборка 1583 (25.11.2017)
var a,b,c:integer;
begin
write('Введите значение a,b,c: '); readln(a,b,c);
writeln('a) ', sqrt(2*a-3)/(b-1)+sqrt(sqr(c)+a*c+sqr(a)));
writeln('b) ', sqrt(2+sqrt(2+sqrt(b+sqrt(abs(c-a))))));
writeln('c) ', 1/(1+1/(a+(1-b)/(1-c))));
readln;
end.
Пример:
Введите значение a,b,c: 4 5 6
a) 9.2768148814563
b) 2.03199344563312
c) 0.827586206896552