var a,b,c:real; begin Write('Введите длину меньшего катета -> '); Readln(a); b:=2*a; c:=sqrt(a*a b*b); Writeln('Длина большего катета ',b,', длина гипотенузы ',c) end.
Тестовое решение: Введите длину меньшего катета -> 15.63 Длина большего катета 31.26, длина гипотенузы 34.9497424883217
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.