Составить программу для вычисления длины диагонали прямоугольника со сторонами a,b.

Program abc;Var a,b,c:real;Beginwriteln('vvedite a,b');Readln(a,b);C:=sqrt(sqr(a)+sqr(b));Writeln('c=',c);End.