Компания Атлантида занимается только морскими путешествиями из Лондона В Вашингтон и обратно. Каждый день в 14:00 из Лондона в Вашингтон отправляется кораблю компании Атлантида. В то же самое время корабль той же компании отправляется корабль из Вашингтона в Лондон. Сколько кораблей компании Атлантида, идущих в противоположном направлении встретит корабль по пути из Лондона в Вашингтон?

1. количество ядер процессора  2. частота процессора и частота системной шины (fsb) процессора  3. объем и количество кэш-памяти процессора (cpu)4. совпадение частоты системной шины cpu и материнской платы5. частота оперативной памяти (ram) и частота шины памяти материнской платы  6. объем оперативной памяти  7. используемый на материнской плате чипсет (intel, via, sis, nvidia, ati/amd)8. используемая графическая подсистема – встроенная в материнскую плату или дискретная  9. тип интерфейса винчестера (hdd) – параллельный ide или последовательные sata и sata-210. кэш винчестера

и это еще не все, можно продолжать. 

ввод x = 1, y = 3

x = 3 - 1= 2

y = 2 * 2 = 4

x = 2 * 4 + 2 = 10

y = 4 + 10/2 = 9

вывод x = 10, у = 9

ответ. в результате работы программы получим: х = 10, у = 9.

1+2+3+4+5+6+7+8+9+10+11+12=78

78: 2=39

делим так, чтобы в обеих частях сумма чисел была 39. для этого линия раздела должна проходить между 3 и 4, а также между 9 и 10. в одной половине 10+11+12+1+2+3=39 и в другой 4+5+6+7+8+9=39

разложим 78 на простые множители:

78 | 2

39 | 3

13 | 13

  1

так как на циферблате всего 12 чисел, получаем, что его ещё можно разделить на 3 и на 6 частей, чтобы суммы чисел в частях были равны:

78: 3=26 (11+12+1+2=26, 9+10+3+4=26, 5+6+7+8=26)

78: 6=13 (12+1=13, 11+2=13,10+3=13, 9+4=13, 8+5=13, 7+6=13)

var

i,j,k: integer;

a,b,c: array [1..30] of integer;

begin

randomize;

j: =0;

k: =0;

for i: =1 to 30 do

begin

a[i]: =random(80)-30;

if a[i] mod 2 =0 then

begin

j: =j+1;

b[j]: =a[i]

end

end;

for i: =30 downto 1 do

if a[i]< 0 then

begin

k: =k+1;

c[k]: =a[i];

end;

for i: =1 to j do

writeln(b[i]);

for i: =1 to k do

writeln(c[i]);

end.