Что из перечисленного не является свойством информации? 1.знаки и сигналы могут предоставить информацию только для получателя который способен их воспринять и распознать 2.информация не материальна 3.информация предоставляет новые сведения об окружающим мире, отсутствовавшие до её получения 4.удобство формы представление информации для восприятия потребителем

Ну вообще свойства информации как помню - доступность, адекватность, объективность, полнота и т.д. думаю 2 не есть правильным ответом, так как книга дает информацию и т.д.

Var  a: array[1..100] of integer;   i, j, c: integer; begin  writeln('массив ');   for i : = 1 to 100 do  begin    a[i] : = random(201) - 100;     write(a[i], ' ');   end;   writeln;   write('введите число (от -100 до 100) ');   readln(j);   for i : = 1 to 100 do      if a[i] = j then begin c : = c + 1; write(i, ' '); end;   writeln;     if c> 1 then write('в массиве число введённое вами есть в массиве и даже несколько (', c, '). их индексы представлены выше') else  if c = 1 then write('число, которое вы ввели есть в массиве. его индекс представлен выше') else write('такого числа в массиве нет');     end.

ответ:

в общем, ошибки такие:

во-первых, начальное значение f должно быть единица, поскольку потом мы умножаем f на k.

во-вторых, k должно быть меньше или равно n. если просто меньше, тогда программа найдёт факториал числа n-1.

в-третьих, после do нужно написать begin, иначе увеличение k на единицу не произойдёт и мы никогда не выйдем из цикла.

вроде всё

объяснение:

вот полная программа.

var n, k, f: integer;

begin

readln(n);

k: =1;

f: =1;

while k< =n do begin

f: =f*k;

k: =k+1;

end;

write(f);

end.