Question

Помогите пожалуйста, нужно сделать блок-схему!Определить суммарный объем в литрах 12 вложенных друг в друга шаров со стенками 5 мм. Внутренний диаметр внутреннего шара равен 10 см. Считать, что шары вкладываются друг в друга без зазоров. Program lab3;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.

Answer 1

Блок-схема во вложении