1) напишите полный текст программы, вычисляющей значение гипотенузы по известным катетам. значение катетов с команды readln. 2) напишите полный текст программы, которая переводить значение скорости v( вводимого оператором readln) ы размерности км/чач в размерность м/сек сильно нужно

// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
begin
  var a,b:real;
  Readln(a,b);
  Writeln(sqrt(a*a+b*b))
end.

Тестовое решение
5.35 3.8
6.56220237420334

// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
begin
  var v:real;
  Readln(v); Writeln(v*1000/3600)
end.

Тестовое решение
76.43
21.2305555555556