1. Скорость передачи данных по некоторому каналу связи равна 32000 бит/c. Передача файла по этому каналу связи заняла 8с. Определите размер файла в байтах.

5

Объяснение:

1. Функциональные клавиши (с F1 по F12).

2. Алфавитно-цифровые (буквы и цифры (цифры, которые сверху))

3. Клавиши управления курсором (Page Up, Page Down, Home, End, Insert)

4. Специальные клавиши (Backspase, Caps Lock, Shift, Alt, Nut Look, Enter)

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

1. В приведенном коде ошибка. Не хватает ";" в третьей строке снизу.
2. Немного изменим ваш код и получим искомое значение x
Искомое число х = 16293

var
  x, y, a, b, k: integer;

begin
  k:=10000;
  repeat
    x:=k;
    a := 0; b := 0; y := 1;
    while x > 0 do
    begin
      if (x mod 10) mod 2 = 0
        then
        a := a * 10 + x mod 10
      else begin
        y := y * 10;
        b := b * 10 + x mod 10
      end;
      x := x div 10
    end;
    a := a * y + b;
    k := k + 1;
    until a = 26391;
    writeln(a:8, k-1:8); 
end.