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