var a,b,c:real;
begin
write('a = ');
readln(a);
b:=a+5;
c:=sqrt(a*a+b*b);
writeln('c = ',c:4:2);
end.
Пример:
a = 3
c = 8.54
