Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
sunnyAkhhhh
26.03.2022 02:27 •
Информатика
1.составить программу вычисления объема усеченного конуса,если известны радиуса оснований r и r,высота усеченного конуса h.
Показать ответ
Ответ:
Pantiik
07.10.2020 14:04
Var r1, r2, h, V: real;
begin
write('Нижнее основание: '); readln(r1);
write('Верхнее основание: '); readln(r2);
write('Высота: '); readln(h);
V := (1/3)*pi*h*(sqr(r1)+r1*r2+sqr(r2));
writeln('Объем = ', V:0:4);
end.
0,0
(0 оценок)
Ответ:
zhilkinatata
07.10.2020 14:04
П2 -> П1 -> П0 x^2 ИП1 x^2 + ИП0 ИП1 * + ИП2 * пи * 3 / С/П
Ввод: радиус_1 ^ радиус_2 ^ высота С/П.
0,0
(0 оценок)
Популярные вопросы: Информатика
dkcmvmcmf
13.10.2021 19:18
Материалы, используемые 3D- принтером, называются ...Двигатель принтераповерхность дляизготовления моделидисплейфиламент...
timirshan
11.02.2020 09:32
Выберите все верные ответы. Из перечня имён выберите те, которые удовлетворяют маске ?l*ck.*t? 1)lock.sts 2)blinck.uta 3)black.ppt 4)clock.tt...
МаркЛеткеман
19.09.2022 00:59
Как составить блок-схему и программу, проверяющую, верно ли утверждение, что введенное вами целое число является четным....
falala1
02.06.2023 06:45
Назови свойство, которое есть у всех этих объектов: камень, куст, дерево, цветок....
maratis2007
02.06.2023 06:45
1.201(10)+100(2) ответ в десятичной системе 2.103(10)+10(2) ответ в двоичной системе 3.1101(2)-11(2) ответ в двоичной системе 4.101(2)*10(2) ответ в десятичной системе...
malaxov04
18.06.2020 02:27
Решить ) begin11°(в №3). даны два ненулевых числа. найти сумму, разность, произведение и частное их модулей.входные данные: ввести два целых числа а и b (1 =a,b =100).выходные данные:...
polinaxt1
08.05.2022 04:16
Придумать примеры табличных величин...
pe4enel
16.02.2022 18:12
Программа запрашивает целое число и определяет четное или нечетно. составить блок схему и программу....
Brauberg898117
07.05.2022 18:26
Дана строка. указать те слова, которые содержат хотя бы одну букву k. составить программу на паскаль. заранее ^_^...
aynuran1
21.09.2020 19:08
Вчем заключается разница между записью и полем в табличной базе данных?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
write('Нижнее основание: '); readln(r1);
write('Верхнее основание: '); readln(r2);
write('Высота: '); readln(h);
V := (1/3)*pi*h*(sqr(r1)+r1*r2+sqr(r2));
writeln('Объем = ', V:0:4);
end.
Ввод: радиус_1 ^ радиус_2 ^ высота С/П.