Тим Бернерс-Ли 1980 году для собственных нужд написал программу «Энквайр» которая заложила концептуальную основу для Всемирной паутины. В 1989 году, работая в CERN над внутренней сетью организации, Тим Бернерс-Ли предложил глобальный гипертекстовый проект, теперь известный как Всемирная паутина. Официально годом рождения Всемирной паутины нужно считать 1989 год .Первый в мире веб-сайт был размещён Бернерсом-Ли 6 августа 1991 года.
<span>Теоретические основы веба были заложены гораздо раньше Бернерса-Ли. Ещё в 1945 году Ванна́вер Буш разработал концепцию «Memex» — вспомогательных механических средств «расширения человеческой памяти» . Memex — это устройство, в котором человек хранит все свои книги и записи (а в идеале — и все свои знания, поддающиеся формальному описанию) и которое выдаёт нужную информацию с достаточной скоростью и гибкостью. Оно является расширением и дополнением памяти человека. Бушем было также предсказано всеобъемлющее индексирование текстов и мультимедийных ресурсов с возможностью быстрого поиска необходимой информации. Следующим значительным шагом на пути ко Всемирной паутине было создание гипертекста (термин введён Тедом Нельсоном в 1965 году) .</span>
Острое зрение.!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
21. Рассмотрим прямоугольник, помеченнный звёздочкой (см. рисунок). Пусть он закрашен каким-то цветом. Он окружен четырьмя областями, для их закраски нужно не меньше двух дополнительных цветов. Но тогда цвет всех остальных областей, кроме желтой, определяется однозначно, но жёлтую никаким цветом закрасить не получится. Значит, трёх цветов не хватит. Пример раскраски четырьмя красками на рисунке.
22. Он может развести все 8 мостов. Сначала он добирается на мост 2, затем идёт 2-3 (разводит), 3-4, 4-1 (разводит), 1-5, 5-1 (разводит), 1-2 (разводит), 2-5 (разводит), 5-3 (разводит), 3-4 (разводит), 4-5 (разводит).
23. Теги font меняют свойства текста между <font> и </font>. На картинке показано более чётко, что в один и тот же тег попали строчки 2 и 4, эти строки будут одного цвета.
Program z;
const n=5;
var a:array[1..n] of real;
i:integer; s:real;
begin
s:=0;
for i:=1 to n do
begin
readln(a[i]);
s:=s+a[i];
end;
s:=s/n;
for i:=1 to n do
if a[i]>0 then a[i]:=s;
for i:=1 to n do
write(a[i],' ');
end.