Написать код в паскале. звучит так: программа модель pascal, которая запрашивает значение катета прямоугольного треугольника и находит размер гипотенузы. , )

Var a, b: real;
begin
write('a = ');
readln(a);
write('b = ');
readln(b);
write('Гипотенуза = ', sqrt(a * a + b * b), ', площадь = ', a * b / 2);
readln
end.