Помогите, если можете. надо написать программу в паскале.
var a,b:integer; begin read(a,b); writeln(sqrt(a*a+b*b)); end.