V = 3×3×3 = 27 см3 или м3
Одним битом можно закодировать два цвета, обычно это черный и белый. Черный 0 - белый 1. У нас четыре цвета. Берем два бита и кодируем:
00 - черный
10 - темносерый
11 - белый
01- светлосерый
Итого двух бит достаточно
Ответ:
var
a: array [1..3] of Integer;
i, imin: Integer;
begin
for i := Low (a) to High (a) do begin
Write (i, ' число: ');
ReadLn (a [i]);
end;
imin := 0;
for i := Low (a) to High (a) do begin
if a [i] mod 2 = 0 then
if imin = 0 then
imin := i
else if a [i] < a [imin] then
imin := i;
end;
if imin <> 0 then
WriteLn ('Наименьшее четное = ', a [imin])
else
WriteLn ('Четных чисел нет.');
ReadLn;
end.
Ақпаратнама; информатика (ғылыми ақпараттың қызметтері мен құрылымын, оларды жасау, қорландыру, түрлендіру және жеткізу әдістерін зерттейтін білім саласы)