Заданы числа a и b. определите, эти числа одного или разных знаков.

Var a,b : integer; begin writeln('a'); readln(a); writeln('b'); readln(b); while a> 0 do   begin    if b> 0 then     writeln ('a и б одного знака');   else    writeln ('a и б разного знака);   end; while a< 0 do   begin    if b< 0 then     writeln ('a и б одного знака');   else    writeln ('a и б разного знака); end; end.

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

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

 

по формуле включений-исключений

35 = 24 + 18 + 12 - 5 - 10 - 8 + х

х = 4

 

чтобы понять формулу, надо нарисовать 3 круга которые имеют общую область пересечения