Вывести на экран все простые числа в диапазоне от a до в. (pascal)

Var
  a, b, i, j: longint;
  ar: array of boolean;
 begin
  readln(a, b);
  setlength(ar, b);
  for i := 1 to b do ar[i - 1] := true;
   i := 2;
  while (sqr(i) <= b) do
  begin
    if(ar[i - 1] = true) then
     begin
      j := sqr(i);
      while (j <= b) do
      begin
        ar[j - 1] := false;
        j := j + i;
      end;
    end;
    i := i + 1;
  end;
   for i := a to b do
     if(ar[i - 1] = true) then write(i, ' ');
end.

Разбираемся с личным кодом:
Длина n=11 символов
23 буквы + 10 цифр = 33 символа - мощность алфавита личного кода.
33<2^i, где i - кол-во бит на символ
i = 5 бит (из неравенства выше)
V = i * n = 5 бит * 5 = 25 бит ≤ 8 байт

Разбираемся с кодом подразделения:
Длина n=299 символов
26 буквы + 10 цифр = 36 символов - мощность алфавита кода подразделения
i = 6 бит
V = 299 * 6 бит = 1794 бит ≤ 12 байт

Итого объем кодов в сумме равен V=8 + 12 байт = 20 байт
Объем хранящийся на пропуске равен 30 байтам
Объем доп. информации 30 байт - 20 байт = 10 байт.

На Русском.

Эргоно́мика — наука о при должностных обязанностей, рабочих мест, предметов и объектов труда, а также компьютерных программ для наиболее безопасного и эффективного труда работника, исходя из физических и психических особенностей человеческого организма.

На Казахском.

Эргономика-адам ағзасының физикалық және психикалық ерекшеліктеріне негізделген қызметкердің ең қауіпсіз және тиімді жұмысына арналған лауазымдық міндеттерді, жұмыс орындарын, еңбек объектілері мен объектілерін, сондай-ақ компьютерлік бағдарламаларды бейімдеу туралы ғылым.

Объяснение: