Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
natka012
29.10.2021 13:31 •
Информатика
Вычислить площади поверхностей и объемы трех воздушных шаров с известными радиусами , использовав процедуру для вычисления площади и объема. радиусы шаров соответственно равны 5,10,15 м .
Показать ответ
Ответ:
kate050804
02.10.2020 23:22
Procedure s_v(r:real; var s,v:real);
begin
s:=4*Pi*r*r;
v:=4/3*Pi*r*r*r;
end;
var a,b:real;
begin
s_v(5,a,b);
writeln('r=5, S=',a:5:2,' V=',b:5:2);
s_v(10,a,b);
writeln('r=10, S=',a:5:2,' V=',b:5:2);
s_v(15,a,b);
writeln('r=15, S=',a:5:2,' V=',b:5:2);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
vlad97vb
21.08.2022 06:01
Куда в pubg mobile вводить код приглашения? ...
kutirev123p
30.04.2020 12:39
Задания для составления линейных программ 1*. На числовой оси х даны целые числа х, их, (рис. 1). Напиши про-грамму вычисления расстояния между точками с координатами х, и..Пример...
зайка191111
08.02.2023 12:27
В КУМИРЕ ИЛИ МНЕ 2 ПОСТАВЯТ(МОГУ ДАТЬ БОЛЬШЕ )1. Начертите фигуру, нзображен ную на рисунке, используя вс гательный алгоритм с аргументамидля рисования отдельного элемента....
PRO100RAMZAN
04.09.2021 05:29
(КУМИР) ГОСПОДИ ИЛИ МНЕ 2 ПОТСАВЯТ1. Начертите фигуру, нзображен- ную на рисунке, используя вс гательный алгоритм с аргументамидля рисования отдельного элемен-та. Количество...
R1FL
12.12.2022 04:47
задан одномерный массив x [n] целых чисел, N (1 n 1000) Найдите Р-ый минимальный элемент, используя сортировку....
Den4ikBLeT
02.03.2020 11:29
1. Напиши названия браузеров....
КривенкоЖеня
15.09.2021 09:17
1. Составить программу подсчета количества ненулевых элементов в массиве В(15), если элементы массива целые положительные и отрицательные числа, задаются с клавиатуры. 2. Дан...
Эхэхэхэхэхэх
24.11.2022 09:16
дано натуральное число n ( 1 n 1188), определяющее возраст человека ( в месяцах). Выразить возраст в годах и месяцах , например 21 год 10 месяцев , 52 года 1 месяц , 46 лет...
youtubeadamchuk
31.01.2023 09:35
3. Массив из 10 элементов (заполнение определите самостоятельно). Найти наименьший из четных элементов. 4. Массив М[1..n] задан в диапазоне значений [-20..20]. Найти минимальный...
05Adam05
19.10.2021 02:30
даны 2 числа. если квадратный корень из второго числа меньше первого числа, то увеличить второе число в 5 раз. python ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
s:=4*Pi*r*r;
v:=4/3*Pi*r*r*r;
end;
var a,b:real;
begin
s_v(5,a,b);
writeln('r=5, S=',a:5:2,' V=',b:5:2);
s_v(10,a,b);
writeln('r=10, S=',a:5:2,' V=',b:5:2);
s_v(15,a,b);
writeln('r=15, S=',a:5:2,' V=',b:5:2);
end.