1. Напишите наименьшее число x, для которого ложно высказывание (x меньше 42) или (x не делится на 3) 2. Напишите наименьшее число x, для которого ложно высказывание (x больше или равно 40) или (x делится на 3) 3. Напишите наименьшее число x, для которого ложно высказывание (x больше 15) или (x кратно 14)

1) 41

2) 39

3) 28

28 потому что 14 на 14 будет 28

Компьютерная память является одним из наиболее главных вопросов устройства компьютера, так как является важнейшей частью его устройства, а именно, компьютерная память обеспечивает поддержку одной из наиважнейшей функций современного компьютера длительного хранения информации.

Вместе с центральным процессором запоминающее устройство являются ключевыми звеньями.

Все персональные компьютеры используют три вида памяти: оперативную, постоянную и внешнюю (различные накопители).

Также компьютерная память классифицируется по различным признакам.

В данной работе рассмотрим понятия компьютерной памяти, ее виды и классификации в теоретическом и практическом контекстах.

PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018Внимание! Если программа не работает, обновите версию!

function Dec2Bin(t: integer): string;

begin

 var r: string := '';

 while t >= 2 do

   (r, t) := (t mod 2 + r, t shr 1);

 r := t + r;

 Result := '0' * (8 - r.Length) + r

end;

function Bin2Dec(s: string): integer;

begin

 Result := 0;

 var p := 1;

 for var i := s.Length downto 1 do

 begin

   Result += (s[i].ToDigit) * p;

   p *= 2

 end

end;

function GenSeqCycle(n: integer): sequence of integer;

begin

 var s := Dec2Bin(n);

 loop 8 do

 begin

   yield Bin2Dec(s);

   s := s[2:] + s[1]

 end

end;

begin

 GenSeqCycle(ReadInteger).Max.Println

end.