Число 10110012 в восьмиразрядном представлении имеет вид 01011001 .

Презентация является отличным представления информации. Цель самой презентации - донести до аудитории, для которой она разработана, полноценную и легко усваиваемую информацию о представляемом объекте. Она создается на основе слайдов, которые непрерывно идут в определенной заданной последовательности. Человек, использующий такой вид представления информации, может сам контролировать ход презентации. Этот вид подачи информации называется интерактивным. Также есть возможность дать презентации идти своим ходом, когда она выполняется непрерывно, независимо от исполнителя.

Презентации могут нести различный смысл показа. Это могут быть обучающие презентации, с которых проще понять и запомнить аспекты изучаемой темы. С этого представления информации можно сопровождать научный доклад. Ну и конечно такие презентации широко рас в различных рекламных компаниях, которые используют их для представления рекламируемого товара и быстрого заключения сделки. И это неудивительно, ведь легче один раз показать, чем несколько раз объяснять, пока слушающий наконец-таки поймет, о чем идет речь.

Чем же так удобен данный представления информации? И почему он так эффективен? Дело в том, что готовить доклад в устной форме достаточно сложно. Во время рассказа можно забыть текст, волноваться и таким образом загубить свою работу. Оформив же свой доклад в форме презентации, рассказчик может объяснять тему, опираясь на слайды, показываемые во время презентации. А эффективна презентация благодаря своему легкому усвоению.

Слушатель, одновременно смотря слайды и слушая доклад, может запомнить и понять гораздо больше, чем при обычном повествовании. Происходит это, потому что человек около 80% информации усваивает за счет зрительного обучения и только 15% - от информационного потока. Из этого следует, что презентация понять смысл доводимой до слушающей аудитории информации на максимальном уровне.

В том, что презентация один из лучших подачи информации нет никаких сомнений. Она эффективна, как для докладчика, так и для слушателя. Ее можно использовать в разных направлениях сферы деятельности, будь то учеба или деловые переговоры. Презентация доступна для всех, и с ней легко работать как начинающему, так и уже знакомому с данным методом представления информации. Используя однажды данный в следующий раз без каких-либо сомнений вы выберете именно его.

"Типовой школьный" Паскаль:

// PascalABC.Net 3.0, сборка 1064
const
  k = 100;

var
  s, wd: string;
  i, j, m, n, pt, step: integer;
  Words, WordsSort: array[1..k] of string;
  InOrder: boolean;

begin
  Write('Введите строку: '); Readln(s);
  n := Length(s); pt := 1; m := 0;
  repeat
    // Пропускаем все символы до первого непробельного
    while pt <= n do
      if Ord(s[pt]) <= 32 then Inc(pt) else break;
    if pt <= n then begin
      // Выделяем очередное слово
      wd := '';
      while pt <= n do
        if Ord(s[pt]) > 32 then begin wd := wd + s[pt];Inc(pt) end
        else break;
      if wd <> '' then begin Inc(m);Words[m] := wd end
    end
  until pt > n;
  // Теперь Words содержит все m слов.
  // Отсортируем их в массиве WordsSort методом Шелла
  for i := 1 to m do WordsSort[i] := Words[i];
  step := m div 2;
  while step > 0 do begin
    for j := m - step downto 1 do begin
      i := j;
      while i <= m - step do begin
        if WordsSort[i] > WordsSort[i + step] then begin
          wd := WordsSort[i];
          WordsSort[i] := WordsSort[i + 1];
          WordsSort[i + 1] := wd
        end;
        i := i + step
      end
    end;
    step := step div 2
  end;
  // Осталось поэлементно сравнить оба массива
  InOrder := true; i := 1;
  while InOrder and (i <= m) do
  begin InOrder := (Words[i] = WordsSort[i]); Inc(i) end;
  if m = 0 then Writeln('Строка не содержит слов')
  else
    if InOrder then Writeln('Cлова упорядочены')
    else Writeln('Cлова не упорядочены')
end.

Тестовое решение:
Введите строку: слово1    слово2    слово3    слово4 слово5
Cлова упорядочены

Введите строку: слово1    слово2    слово4    слово3 слово5
Cлова не упорядочены

"Современный" вариант решения на Паскале:

// PascalABC.Net 3.0, сборка 1064
var
  s:string;
begin
  Write('Введите строку: '); Readln(s);
  var Delim:=Range(0,32).Select(x->Chr(x)).ToArray;
  var Words:=s.Split(Delim).Where(x->x<>'');
  var WordsSort:=Words.Sorted;
  if Words.SequenceEqual(WordsSort) then Writeln('Cлова упорядочены')
  else Writeln('Cлова не упорядочены')
end.

Тестовое решение совпадает с вышеприведенным.