Як при заповненні таблиці перейти від клітинки до клітинки?

программа на языке pascal, успехов в учебе.

program pr;

var n,m,z,k,i,vm: integer;

begin

readln (n,m,z);

vm: =n*60+m;

i: =1;

while i< =vm do

begin

k: =k+1;

i: =i+z;

end;

writeln (k);

readln;

end.

  программную систему можно рассматривать как множество классов, позволяющих создавать, получать доступ и изменять коллекции данных, называемых объектами

вызов объектом компонента – основная базисная операция оо программирования

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

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) 

для начала переведем кбайты в биты:

2500кбайт=2500*1024*8=20480000бит,

затем найдем искомое   время: t=объём файла/скорость передачи,

t=20480000/1024000=20 секунд