Определите значение высказывания"источником информации может быть только живое существо"а)истина б)ложь

Б) ложь подумайте и поймете, что источник информации может быть: компьютер, телефон, книга, диктофон, бумаги и т.д.

Решить можно обратным ходом т.е. провести все вычисления в обратном порядке: предположим что число 62 мы таки получили,тогда пред последним шагом было либо умножение, либо перестановка цифр; рассмотрим два случая: 1)если перестановка, то: перед ней было число 26 если его тоже получили путем перестановки получается замкнутый круг, следовательно оно получило умножением из 13-нечетное 31(перестановка) тоже нечет - противоречие. 2)если 62 получили умножением то: раньше было число 31-нечетное и если пере ставить цифры то 13-тоже нечетное, следовательно случай тоже невозможен. ответ: число 62 из единицы получить нельзя

var

  a: array[1..12] of integer;

  i: integer;

begin

  randomize;

  writeln('сгенерированный массив: ');

  for i : = 1 to 12 do

  begin

      a[i] : = random(36) - 15;

      write(a[i], ' ');

  end;

  writeln;

end.

 

//вторая программа

const

  n = 8;

var

  a: array[1..n] of integer;

  i, count3, count4, count5: integer;

begin

  randomize;

  writeln('оценки учеников: ');

  for i : = 1 to n do

  begin

      a[i] : = random(3) + 3;

      write(a[i], ' ');

      if a[i] = 5 then

          inc(count5);

      if a[i] = 4 then

        inc(count4);

      if a[i] = 3 then

          inc(count3);

  end;

  writeln;

  writeln('троек - ', count3);

  writeln('четверок - ', count4);

  writeln('пятерок - ', count5);

end.

 

 

 

 

//третья программа

var

  k: array[1..12] of integer;

  i: integer;

begin

  randomize;

  writeln('сгенерированный массив: ');

  for i : = 1 to 12 do

  begin

      k[i] : = random(36) - 15;

      write(k[i], ' ');

  end;

  writeln;

  writeln('преобразованный массив: ');

  for i : = 1 to 12 do

  begin

      k[i] : = k[i] * (-1);

      write(k[i], ' ');

  end;

end.