Центральный процессор - CPU (central processing unit, что дословно значит "центральное процессорное устройство") - это главный вычислительный электронный блок компьютера. Именно процессор отвечает за обработку всех данных в системе и глобально управляет работой аппаратного обеспечения компьютера.Из чего состоит процессор? Внешне - это небольшая четырехугольная пластина, с одной стороны оснащенная рядами "штырьков" или "ножек" - электрических контактов, которые вставляются в процессорный разъем (сокет) на материнской плате. Внутреннее устройство представляет собой миллионы микроскопических транзисторов, объединенных в единый комплекс - сложнейшую электрическую цепь. Именно они, подобно мозговым клеткам, и выполняют всю вычислительную работу. Транзисторы (переключатели электрического тока в микросхеме) размещаются на подложке из чистого кремния, и всю эту конструкцию иначе называют кристаллом или камнем процессора. Кажется удивительным, что число транзисторов на участке, площадью с булавочную головку, может достигать 200 миллионов - настолько они малы. Процессор - одно из самых сложных технических устройств, производимых человеком.Как работает процессор? Говоря простым языком - последовательно выполняет арифметические операции с данными, загруженными из памяти, согласно определенному алгоритму. Алгоритм команд соответствует логике выполняемой программы.Видов процессоров существует много, выпускаются они для различных целей и разными производителями, поэтому чтобы понимать, чем они между собой различаются, нужно знать их основные характеристики и показатели. Остановимся на характеристиках процессоров подробнее. Следует учесть, что о производительности процессоров не судят, сравнивая их между собой по какому-либо одному показателю (за исключением линейки изделий одного производителя). То есть, утверждение, что лучше тот процессор, у которого больше ядер, без учета остальных критериев будет не верным.Итак, важнейшие характеристики процессора, на которые стоит обращать внимание при выборе.Число ядерЧем больше у процессора ядер, тем большее число операций он может выполнять одновременно без потери производительности. Одноядерные процессоры для персональных компьютеров сегодня уже не выпускаются - наступила эра многоядерности. Именно за счет увеличения числа ядер ведущие производители планируют наращивать мощность процессоров в дальнейшем. Сегодня на персональные рабочие станции устанавливаются, как правило, 2-8 ядерные CPU, а для серверных систем уже существуют и 16-ядерные. В экспериментальных условиях проходят апробирование процессоры, оснащенные более чем 20 ядрами.Увеличение производительности за счет количества ядер особенно ощутимо при исполнении многозадачных программ, в логику которых заложено одновременное выполнение нескольких действий. В то время, как одноядерный процессор выполнял бы задачи последовательно - одну за другой, многоядерный - делает это параллельно.Тактовая частотаЭта характеристика указывает на то, сколько операций выполняет процессор в единицу времени. Многие привыкли считать, что тактовая частота - это показатель производительности, и чем она выше, тем "шустрее" процессор. Утверждение справедливо, если сравнивать между собой поколения CPU одной марки, однако сопоставлять по этому показателю процессоры разных производителей нельзя - при одинаковой тактовой частоте они работают с различной скоростью, поскольку на нее влияют в не меньшей степени и другие характеристики. Например, процессоры марки AMD работают на более низких тактовых частотах, чем Intel, но за один такт производят больше действий.
// PascalABC.NET 3.1, сборка 1200 от 13.03.2016 function IsPrime(n:integer):boolean; begin if n<4 then Result:=True else begin var found:= (n mod 2 = 0); var p:=3; while (not found) and (sqr(p)<=n) do begin found:=(n mod p = 0); p+=2 end; Result:=not found end end;
begin Writeln('k=',ArrRandom(ReadInteger('n='),1,999).Println. Where(x->IsPrime(x)).Count) end.
// PascalABC.NET 3.1, сборка 1200 от 13.03.2016 procedure IsPrime(n:integer; var res:boolean); begin if n<4 then res:=True else begin var found:= (n mod 2 = 0); var p:=3; while (not found) and (sqr(p)<=n) do begin found:=(n mod p = 0); p+=2 end; res:=not found end end;
begin var a:=ArrRandom(ReadInteger('n='),1,999); a.Println; var k:=0; var prime:boolean; foreach var e in a do begin IsPrime(e,prime); if Prime then Inc(k) end; Writeln('k=',k) end.
