Напишите управляемую процедуры для пятиугольной закручивающейся спирали.

var a,b,c,d,x,res: integer;

begin

readln(x);

a: =x div 1000;

b: =x mod 10;

c: =x div 100 mod 10;

d: =x mod 100 div 10;

res: =a+b+c+d;

writeln(res);

readln;

end.

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

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

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

var

i: integer;

a: array[1..20] of integer;

function fn(x: integer): integer;

begin

if x mod 10 = 4 then fn: =x div 2

else fn: =x;

end;

begin

for i: =1 to 20 do

readln(a[i]);

for i: =1 to 20 do

begin

a[i]: =fn(a[i]);

writeln(a[i]);

end;

end.

койка, стройка, трест, рой, репа, тройка, река, серп,строка.