Информатика, опубликовано 2018-08-22 21:14:04 by Гость
Pascal ABC: Даны катеты прямоугольного треугольника. Найти его гипотенузу и площадь
Ответ оставил Гость
Program prtr;
var a,b,c,S: real;
begin
readln(a); //1 катет
readln(b); // 2 катет
c=sqrt(a*a+b*b); //теорема пифагора
S=0.5*a*b; //площадь
writeln(c);
writeln(S);
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на