Giammy 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