
Таптыков
5 год назад
разработайте проект нахождение длины гипотенузы и площади прямоугольного треугольника по известным катетам;нужен листинг программы для Delphi
ОТВЕТЫ

Kirill
Oct 24, 2020
var
a, b: real;
begin
readln(a, b);
Writeln('c = ', Sqrt(a * a + b * b));
Writeln('S = ', a * b * 0.5);
end.
a, b: real;
begin
readln(a, b);
Writeln('c = ', Sqrt(a * a + b * b));
Writeln('S = ', a * b * 0.5);
end.
761
Смежные вопросы: