Program p; var a,b,c,s: integer; begin writeln('введите длину:'); readln(a); writeln('введите диагональ:'); readln(c); b := sqrt((sqr(c) - sqr(a))); s := a * b; writeln('площадь прямоугольника: ', s); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
