Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
LalkaZEKA
03.04.2022 13:52 •
Информатика
Нужно написать программу вычисления объёма усеченной пирамиды , в паскаль . v=h(sосн1+sосн2+корень(sосн1 sосн2))/3 . в паскаль
Показать ответ
Ответ:
SofiCat5
05.10.2020 00:16
Var
h,s1,s2,v:real;
begin
Write('Площадь нижнего основания пирамиды: '); Read(s1);
Write('Площадь верхнего основания пирамиды: '); Read(s2);
Write('Высота пирамиды: '); Read(h);
v:=h*(s1+s2+sqrt(s1*s2))/3;
Writeln('Объем пирамиды: ',v)
end.
Пример
Площадь нижнего основания пирамиды: 28
Площадь верхнего основания пирамиды: 17.5
Высота пирамиды: 9
Объем пирамиды: 202.907830863536
0,0
(0 оценок)
Популярные вопросы: Информатика
pixxxiv
17.05.2023 03:16
Дано натуральное число х. вычислить y = x5. разрешается использовать только три операции умножения. протестировать про протестировать программу для x=-2 и x=3. составить...
Неизвестная66
12.03.2021 17:21
Два игрока играют в следующую игру. Перед ними лежат две кучки камней (в первой — 2 камня, во второй — 4 камня). У каждого из них неограниченное количество камней....
Помошник111111114555
31.08.2021 01:02
Некоторое расстояние ласточка пролетит за 30 минут со скоростью 50км/ч. за сколько минут пролетит за тоже расстояние стриж, будет если лететь со скоростью 100км/ч...
gvg1971
31.08.2021 01:02
Местоимения характерен(для кого? ) очораватся (в ком? ) разочароватся(в ком? ) описывать(что? ) писать(о чем? ) показать(что? ) указать(на что? ) рассказать(о чем?...
arseniyrom20p08lxy
31.08.2021 01:02
In 1869, a special new waterway (to be completed). it connects the maditerranean and the red sea and (to be called) the suez canal. some sections of the canal (to...
Тетрадь22
31.08.2021 01:02
Рассчитайскорость распространения света в кварце, если абсолютный показатель преломления кварца равен 1,5....
gfff2
31.08.2021 01:02
Филворд представляет собой поле, заполненное буквами. из всей данной комбинации букв тебе необходимо отыскать названия птиц, изображённых на рисунках. слова могут...
aleksandr17082004
06.02.2023 02:53
Прочитайте следующие ситуации и ответьте на вопрос: ! yesterday my sister went to the chemist’s and bought a box of medicine with a white label on it. yesterday my...
Bossak
06.02.2023 02:53
В.п.остафьев ,,стрижонок скрип три примера где фантазия где быль...
strelkina42
06.02.2023 02:53
Подчеркни глаголы, которые отвечают на вопросы что сделает? , что сделают? , что будут делать? на венеру хотим мы слетать. к дальним дорогу проложим! мы мечтаем и...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
h,s1,s2,v:real;
begin
Write('Площадь нижнего основания пирамиды: '); Read(s1);
Write('Площадь верхнего основания пирамиды: '); Read(s2);
Write('Высота пирамиды: '); Read(h);
v:=h*(s1+s2+sqrt(s1*s2))/3;
Writeln('Объем пирамиды: ',v)
end.
Пример
Площадь нижнего основания пирамиды: 28
Площадь верхнего основания пирамиды: 17.5
Высота пирамиды: 9
Объем пирамиды: 202.907830863536