Помощь - Поиск - Пользователи - Календарь
Полная версия: Вычислить объем десяти шаров
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
Altair47
ычислить объемы десяти шаров по формуле V=4/3pi*R*R*R . При каждом таком исчислении R увеличивается на величину R Δ. Исходными данными являются начальное значение R и R Δ.
Нужно написать программу, которая последовательно будет решать задачу, с использованием циклов While,Repeat, For.
Igor-95
Код

for i:=1 to 10 do
Begin
  V:=V+4/3*pi*R*R*R;
  R:=R+dR
End
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.