Посмотрите цепочку из букв. Истинные или ложные следующие утверждения. -К-О-Л-О-Б-О-К->
1. В цепочке пятая буква Б.
2. Третья буква Ф.
3. Первая буква К.
4. После буквы Л следует буква А.

ответ:Інформатика – це галузь науки, що вивчає структуру і загальні властивості інформації, а також питання, пов’язані з пошуком, збиранням, перетворенням, зберіганням, поширенням і використанням інформації у різних сферах людської діяльності.

Інформатика сформувалась як наука зав­дяки розвитку комп'ютерної техніки.

До складу інформатики входять:

1. Теоретична інформатика – цей розділ інформатики використовує математичні методи для спільного вивчення процесів обробки інформації.

2. Обчислювальна техніка – розділ у якому розробляються загальні принципи побудови обчислювальних систем.

3. Програмування – діяльність пов’язана з розробкою програмного забезпечення.

4. Інформаційні системи – це розділ інформатики, що включає: інформаційно-пошукові, інформаційно довідкові системи, сучасні глобальні системи зберігання, пошуку інформації.

5. Штучний інтелект – область інформатики в якій розглядаються складні проблеми, що знаходяться на перетині з психологією, фізіологією, лінгвістикою та іншими науками. Основне завдання навчити комп’ютер мислити подібно до людини.

Объяснение:

Procedure TForm1.Button1Click(Sender: TObject);
begin
    If FontDialog.Execute then
        RichEdit1.SelAttributes.Assign(FontDialog1.Font);
        RichEdit1.SetFocus;
    End;
end;

делфи у меня не установлены за совершенной ненадобностью, потому проверить возможности нет, но догадки показать могу.
 Не уверенна что RichEdit1.SelAttributes.Assign(FontDialog1.Font) выставляет шрифт, может там нужна кострукция типа
  RichEdit1.SelAttributes.Font := FontDialog1.Font
и конечно описка выделенная ранее, как на нее только компилятор не матерится