1).Дана площадь S квадрата. Вычислить длину стороны a и длину диагонали d . 2).В прямоугольном треугольнике заданы два катета a и b. Найти гипотенузу С и площадь S.
Паскаль?
1) var a,s:integer; begin readln(s); writeln('Длина стороны = "' sqrt(s)); writeln('Длина диагонали = ', sqrt(s)*sqrt(2)); end. 2) begin readln(a,b); writeln('Гипотенуза = ', sqrt((a*a)+(b*b))); writeln('Площадь = ', (a*b)/2); end.
пасибо