Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
Объяснение:
100 кбайт = 100 * 8 = 800 кбит
800 : 1024 = 0,78125 мбит
0,78125 : 100 = 0,0078125 сек
var i,s,k: integer;
begin
for i: =-4 to -15 do begin
inc(s,i); inc(k)
end;
write('ср арифм = ',s/k)
end.
Популярные вопросы