Var r,h,s: real; begin write('Введите радиус: '); readln(r); write('Введите высоту: '); readln(h); s:=4*pi*r*(h+r); writeln('Полная площадь цилиндра равна ',s); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
