program ExpressionValue;
vara, b, c: real;y: real;
beginwrite('Enter the value of a: ');readln(a);write('Enter the value of b: ');readln(b);write('Enter the value of c: ');readln(c);
y := sqrt(a) + abs(b) + power(15 + c, 2);
writeln('The value of the expression y = sqrt(a) + abs(b) + (15 + c)^2 is: ', y:0:2);end.
program ExpressionValue;
var
a, b, c: real;
y: real;
begin
write('Enter the value of a: ');
readln(a);
write('Enter the value of b: ');
readln(b);
write('Enter the value of c: ');
readln(c);
y := sqrt(a) + abs(b) + power(15 + c, 2);
writeln('The value of the expression y = sqrt(a) + abs(b) + (15 + c)^2 is: ', y:0:2);
end.