Ниже записан алгоритм. укажите наименьшее из таких чисел , при вводе которых алгоритм печатает сначала 3, а потом 2. var x, a, b, c: longint; begin readln(x); a: = 0; b: = 0; while x > 0 do begin c: = x mod 2; if c = 0 then a: = a + 1 else b: = b + 1; x: = x div 8; end; writeln(a); writeln(b); end. ответ 4097 объясните как решить

1 - нечетное b = 11 * 8 = 8  четное a = 1 b = 18 * 8 = 64 четное a = 2 b = 164 * 8 = 512  четное a = 3 b = 1512 * 8 = 4096   четное a = 3 b = 1, но это ненужно. Чичсо должно быть нечетным.Поэтому добавляем нечетное, но не более 8.ответ 4097, 4099, 4111, 4113

Відповідь:

Пояснення:

1) буквенного имени столбца и номера строки

2) СРЗНАЧ

3) $C$20

4) 65536

5) #ЧИСЛО!

6) Рабочая книга

7) A21:C24

8) B5:E5 - это 4 ячейки , формула СРЗНАЧ выводит среднее значение этих четырех ячеек , исходя из этого сумма (СУММ) этих ячеек 100*4 = 400. Плюс к этому додается ещё одна ячейка F5 значение которой равно 10 , и того =СУММ(B5:F5) равна 410

9) 2, 4

10) C8:C64

11) бухгалтерский и банковский учет

12) текст, число или формула

13) =916+54

14) Формула будет иметь вид:

=$D$2+D1

15) D4

16) 16

17) 255

1)

var sum, number, n: integer;
begin
  sum := 0;
  number := 1;
  write('Введите n: ');
  readln(n);
  while (number <= n) do
  begin
    sum := sum + number;
    number := number + 2;
  end;
  write('Сумма равна ', sum);
end.

2)

var prod, number, n: integer;
begin
  prod:= 1;
  number := 3;
  write('Введите n: ');
  readln(n);
  while (number <= n) do
  begin
    prod := prod * number;
    number := number + 3;
  end;
  write('Произведение равно ', prod);
end.

3)

var number, n: integer;
begin
  number := 1;
  write('Введите n: ');
  readln(n);
  writeln('Таблица:');
  while (number <= n) do
  begin
    writeln(number:5, number*number:5, number*number*number:5);
    number := number + 1;
  end;
end.