Выделяешь текст (или сразу делаешь стиль) - на выделенном правой мышей - Шрифт - Интервал - Разреженный. Там проставляешь нужное значение.
Var a: array[1..10] of integer; sum, i: integer;beginsum:=0;for i:=1 to 10 do begin readln(a[i]); if a[i] mod 2=0 then sum:= sum+a[i]; end;write(sum);end.
Итак...
Количество сравнений, это сколько раз твое число приравнивается к другим. Смотря на твою последовательность ты после сортировки массива сравниваешь число 2 со своим массивом. Приравниваешь его к первому числу это у тебя единица. Число один не совпадает с даным по условию числом, значит двигаемся дальше, и это уже будет другое сравнение. И так делаем пока не найдем число "2". Так как это число у тебя на втором месте, количество сравнений будет 2.
Если бы ты искал например число 4 количество сравнений было бы 5, так как число 4 стоит пятым в очереди.
Если ты думаешь что радиоволны то ты ошибаешься. <span>На самом деле, радиоволны в микроволновом излучении несут информацию, например, о нарушении дипольной анизотропии реликтового излучения которое говорит о свойствах Вселенной происходивших 14 миллиардов лет назад,
днк 2 место по хранению информации
CD-ROM хранит информацию около 30 лет
а дискета около полугода</span>