Как в ячейки ЭТ будут записаны следующие числа?

это у нас прогрессия b1=1

q=1/2

bn=0,001> b1*q^(n-1)

0,001> q^(n-1)

0,001> 0,5^(n-1)

0,0005> 0,5^n

n=11

s11=b1*(1-q^n)/(1-q)=b1*(1-0,5^11)/0,5=1(0,999511718)/0,5=1,999023438

почти равно двум

паскаль же?

var s, x: string; c, n, err, i, d, k: integer; begin readln (s); n: =length(s); for i: =1 to n do begin

d: =d+k;

val(s,k,err);

end;

write (d);

end.

если 2 сервера за 2 секунды могут обработать 2 миллиона запросов, то один сервер за 2 секунды обрабатывает 1 миллион запросов.

тогда за 6 секунд 1 сервер обрабатывает  1*3 = 3 миллиона запросов, а шесть серверов, соответственно, в 6 раз больше = 18 миллионов запросов.

ответ: 18 млн запросов.

var a: array[1..100] of integer; i,s,n,m: integer; begin randomize; read(n,m); for i : = 1 to 100 do begin a[i]: =random(m-n) +n; if (i mod 2 =0) and (a[i] mod 2 = 0) then s: =s+1; end; writeln(s); end.