Question

(A*a+b*b)/b*b в Паскаль

Answer 1

var a,b:integer;
begin
readln(a,b);
writeln((a*a + b*b) / b*b);
end.