разработайте проект нахождение длины гипотенузы и площади прямоугольного треугольника по известным катетам;
нужен листинг программы для Delphi
Ответы
Ответ дал:
0
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.
Вас заинтересует
1 год назад
1 год назад
8 лет назад
8 лет назад
8 лет назад