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

Program pr1;
Uses Crt;
Var a,b:integer;
    c,d:real;
Begin
WriteLn('Введите значение первого катета'); Read(a);
WriteLn('Введите значение второго катета'); Read(b);
c:=(a*a+b*b);
d:=sqrt(c);
WriteLn('Гипотенуза = ', d);
ReadLn;
End.

программа Dev C++

#include<iostream>

using namespace std;

int main()

{

int a,b,c,p;

cin>>a>>b;

c=a*a+b*b;

c=sqrt(a);

p=a+b+c;

cout<<c<<" "<<p;

system("pause");

return 0;

}