Запишите в традиционной матиматической форме формулу, записанную в формате ЭТ.
СУММ(Z1:Z4)/
СРЗНАЧ(А1:В заранее

если есть д ш и в то это не куб а параллелипипед

var 

a,b,c,r: real;

begin

readln(a,b,c,r);

if (2*r< a) and (2*r< b) and  (2*r< c)

then writeln('поместится')

else writeln ('не поместится');

end.

для куба достаточно одного условия (2*r< a) 

7680*90=691200

691200/16=43200

43200/400=108 страниц

44100*24*60*2=127008000 бит = 15 мбайт

var i: integer; begin  for i: = 2 to 14 do      writeln(i*i); end.