P.S Программа написана для Pascal.
program summa;
var
s:real;
i, n: integer;
begin
writeln('Введите число n: ');
read(n);
s:=0;
for i:=1 to n do
s:=s+(i+1)/i;
writeln('S= ',s:4:2);
end.
Var n,a,b:integer;
function sum(x,y:integer):integer;
var s,i:integer;
begin
s:=0;
for i:=x to y do s:=s+i*i;
sum:=s;
end;
begin
write('n = ');
readln(n);
writeln(n,'^2 + ',n+1,'^2 + ... + ',n+n,'^2 = ',sum(n,n+n));
write('a, b = ');
readln(a,b);
writeln(a,'^2 + ',a+1,'^2 + ... + ',b,'^2 = ',sum(a,b));
end.
Пример:
n = 5
5^2 + 6^2 + ... + 10^2 = 355
a, b = 5 10
5^2 + 6^2 + ... + 10^2 = 355
Время t=F/v скорость v=F/t файл F=t*v
файл F=4096 байт =4*1024*8 бит=2^15 бит
v=512 бит/с =2^9 бит/с
t-?
t=2^15 : 2^9=2^6 c=64 c
v=2048 бит/с =2^11 бит/с
t=2^6 c
F=2^11*2^6=2^17 бит =2^4 Кбайта = 16 Кбайт
ответ 16