Var V,h,S:real; begin write('введите площадь основания пирамиды '); read(S); writeln('введите высоту пирамиды '); read(h); V:=(1/3)*S*h; write('объем пирамиды равен ',V); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
