63

Дана высота и радиус цилиндра. Найти площадь боковой поверхности, полную площадь.…

08 апреля 2023

Дана высота и радиус цилиндра. Найти площадь боковой поверхности, полную площадь. S=2 пRH.Sn=S6+2 пR

категория: информатика

50

Вариант с округлением площадей, если не нужно, просто уберите round в обоих строках.uses crt; var r,h: real; beginwriteln ('Введите через пробел радиус и высоту цилиндра.'); readln (r,h); writeln ('Площадь боковой поверхности равна ', round (2*pi*r*h); writeln ('Площадь полной поверхности равна ', round (2*pi*r*(h+r); end.

Знаете ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...