1) Обе клавиши служат для удаления символов, но клавиша Delete удаляет символ, находяшийся справа от текстового курсора, а клавиша BackSpace - слева. 2) Клавиши управления курсором служать для перемещения по тексту в одном из четырех направлений, но при этом клавиши прокрутки не позволяют перемещаться по тексту вправо и влево. Клавиши со "стрелками" осуществляют перемещение в любом из направлений на одну позицию (символ или строку), а клавиши прокрутки - или на фиксированное число строк (PgUp, PgDn), или к началу текста (Home), или к его концу (End). 3) И режим вставки, и режим замены - оба служат для редактирования текста. Но в режиме вставки очередной вводимый символ добавляется в позицию, указанную текстовым курсором, а в режиме замены вводимые символы заменяют уже имеющиеся и находящиеся справа от курсора.
Примечание. В задании не указано, о каком редакторе идет речь, поэтому ответ написан для общего случая с учетом общеупотребительного применения клавиш и режимов. В конкретном текстовом редакторе могут быть свои особенности, например, клавиша Home в одних редакторах только переводит курсов в первую строку, в других - еще и помещает его перед первым символом текста, а вот в редакторе, где сейчас набирается данный текст, клавиша Home помещает курсор перед первым символом текущей строки.
Const chb:set of char=['а'..'я','a'..'z']; //множество букв
Var ar,s,st:string; i,j,n:integer; c:char; begin readln(s); //читаем текст n:=0; //обнуляем счётчик for i:=1 to length(s) do {всё в нижнем регистре, чтобы не считать заглавную и строчную буквы разными} s[i]:=lowcase(s[i]); for i:=1 to length(s) do //снова пройдёмся по каждой букве begin st:=s; {передаём переменной текст, тем самым не трогая "оригинал"} while pos(s[i],st)<>0 do //пока в копии есть символ с заданным циклом for индексом begin delete(st,pos(s[i],st),1); {...удаляем этот символ(по одному за шаг вложенного цикла)} inc(n); //увеличиваем число удалённых end; {таким образом, данный цикл позволяет проверить количество вхождений символа в строку} if (n<=2) and (pos(s[i],ar)=0) and (s[i] in chb) then ar:=ar+s[i]; {если вхождений не больше 2 и символа нет в конечной строке(чтобы не было повторов) и символ есть в множестве букв(чтобы не было знаков препинания), то добаляем в конечную строку} n:=0; //обнуляем счётчик end; for i:=1 to length(ar)-1 do {Здесь могла быть "быстрая сортировка", но люди не знающие ничего, кроме "пузырька" будут против} for j:=i+1 to length(ar) do if ar[i]>ar[j] then {сравниваем символы. Тип char является целочислительным, следовательно, нам можно} begin c:=ar[i]; ar[i]:=ar[j]; ar[j]:=c; end; writeln('Result:'); //вывод конечной строки for i:=1 to length(ar) do write(ar[i],' '); end.
140
Объяснение:
1100000 переводим в 10 систему счисления
=1*2^6+1*2^5=64+32=96
96 переводим в 8 сист.счисления
96/8=12 ост 0
12/8=1 ост 4
Получили 140