вот так:
1101100 = 108 в десятичной системе
1101100 = 6c в шестнадцатеричной системе
1.Клавиатура это графическая информация? (Нет)
2.Самая главная часть компьютера это колонка? (Нет)
3.Информатика изучает компьютеры? (Нет)
4.С помощью зрения человек <span>получает наибольшее количество информации? (Да)
5.В кодирование входят ребусы? (Да)
</span>
<u><em>1. "Традиционный" вариант</em></u>
//PascalABC.Net 3.0, сборка 1052
function NOD(a, b: longint): longint;
begin
while a <> b do if a > b then a := a - b else b := b - a;
NOD := a
end;
var
f: Text;
tNOD: longint;
begin
Assign(f, 'input.txt'); Reset(f);
if not Eof(f) then Readln(f, tNOD);
var n: longint := 1;
while (not Eof(f)) and (n > 0) and (tNOD > 1) do
begin
Readln(f, n);
if n <> 0 then tNOD := NOD(tNOD, n)
end;
Close(f);
Assign(f, 'output.txt'); Rewrite(f);
Writeln(f,tNOD);
Close(f)
end.
<u><em>2. "Современный" вариант</em></u>
//PascalABC.Net 3.0, сборка 1052
function NOD(a, b: integer): integer;
begin
while a <> b do if a > b then a -= b else b -= a;
Result := a
end;
var
tNOD: integer := 0;
n: integer;
begin
foreach var sn in Readlines('input.txt') do
begin
n := StrToInt(sn);
if tNOD = 0 then tNOD := n
else
if n = 0 then break else tNOD := NOD(tNOD, n);
end;
WriteAllText('output.txt', IntToSTR(tNOD));
end.
Пример файла input.txt находится во вложении, контрольный результат 4096
Розрядність - це кількість біт інформації, які процесор прийме і обробить через свої регістри за один такт.
Тактова частота - це кількість тактів (операцій) процесора в секунду.
Поколiння - це перша цифра в маркуванні процесора.
Форм-фактор - це стандарт, який визначає габаритні розміри технічного виробу, а також описує додаткові сукупністю його технічних параметрів.
Фірма-виробник - це назва фірми, яка виготовляє процесор.
Модифiкацiя - це змінена яким-небудь чином модель процесора.
<span>Кількість ядер мікропроцесора</span> - ця характеристика впливає на багатозадачність системи.
21=1*2⁴+0*2³+1*2²+0*2¹+1*2⁰=10101