Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 977 ответов!

Помогите пожалуйста, нужно сделать в паскале!

10-11 класс

Определить суммарный объем в литрах 12 вложенных друг в друга шаров со стенками 5 мм. Внутренний диаметр внутреннего шара равен 10 см. Считать, что шары вкладываются друг в друга без зазоров.

Если не затруднит, то еще можно в экселе)

SvETA12343 10 нояб. 2014 г., 18:57:12 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Apelsinka11
10 нояб. 2014 г., 20:22:27 (9 лет назад)

var
  r, v: real;
  i: integer;

begin
  v := 0;
  r := 0.5; {радиус в дм, т.к. литр - это куб.дм.}
  for i := 1 to 12 do
  begin
    v := v + 4 * Pi / 3 * sqr(r) * r;
    r := r + 0.05
  end;
  Writeln('Суммарный объем равен ', v:0:3, ' л.')
end.

Тестовое решение:

Суммарный объем равен 26.879 л.


Ответить

Другие вопросы из категории

Описать процедуру SumDigit(N,S), находящую сумму

цифр S целого числа N (N — входной, S — выходной
параметр). Используя эту процедуру, найти суммы цифр пяти данных чисел.

Читайте также

Помогите пожалуйста, нужно сделать в паскале, в экселе, и блок-схему!

(задание номер 5 на фото)

Дан одномерный массив А размерностью 16. Определить максимальное значение среди нечетных элементов массива, и минимальное среди четных элементов массива. Получить сумму максимального и минимального значений элементов массива и преобразовать данный массив по принципу из значений нечетных элементов вычесть сумму, а к четным элементам прибавить сумму. Все первоначальные элементы массива вводятся с клавиатуры.

Помогите пожалуйста, нужно сделать блок-схему!Определить суммарный объем в литрах 12 вложенных друг в друга шаров со стенками 5 мм. Внутренний

диаметр внутреннего шара равен 10 см. Считать, что шары вкладываются друг в друга без зазоров.



Вы находитесь на странице вопроса "Помогите пожалуйста, нужно сделать в паскале!", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.