с форматированием текста по информатике: 1. Установите колонтитул. В нем укажите дату, время создания документа, название документа, используйте курсив, кегль № 8, в названии документа предусмотрите курсив, полужирный.
2. Выделите первый абзац, оформите его шрифтом кегль №14. Установите границы абзаца: отступ слева 1 см; отступ справа 10см, красная строка должна начинаться с 2 см (первая строка, отступ).
3. Установите границы страницы: левое поле – 2 см; правое поле – 1,8 см; нижнее поле – 2,2 см; верхнее поле – 2 см.
4. Предусмотрите в заголовке все буквы прописные, гарнитура полужирная, после заголовка «отбейте» пустой абзац, высота букв – кегль № 16.
5. В датах используйте цвет шрифтового оформления – красный.
6. В названиях систем счисления используйте гарнитуру шрифтов к
7. В четвертом абзаце в слове Нейрокомпьютер предусмотрите буквицу.
8. Шестой абзац поделите на 2 колонки
9. В числах во всем тексте предусмотрите стиль шрифта Mistral, кегль 12, полужирный.
10. Вставьте подходящий рисунок, сделайте его подложкой. Подпишите рисунок, например, Рис. 1. Множество чисел. Перед названием рисунка и после предусмотрите пустую строку.
Сам текст, который надо форматировать, находится в прикреплённом файле.
uses crt;
label 1;
var a: integer;
begin
1: write('Введите азимут в градусах: ');
readln(a);
if a in [1..89] then writeln('Направление: северо-восток');
if a = 90 then writeln('Направление: восток');
if a in [91..179] then writeln('Направление: юго-восток');
if a = 180 then writeln('Направление: юг');
if a in [181..269] then writeln('Направление: юго-запад');
if a = 270 then writeln('Направление: запад');
if a in [271..359] then writeln('Направление: северо-запад');
if a in [0,360] then writeln('Направление: север');
if a > 360 then begin
clrscr;
введите корректное значение.');
goto 1;
end;
if a < 0 then begin
clrscr;
введите корректное значение.');
goto 1;
end;
end.
{Второй вариант}
uses crt;
label 1;
var a: integer;
begin
1: write('Введите азимут в градусах: ');
readln(a);
case a of
0,360: writeln('Направление: север');
1..89: writeln('Направление: северо-восток');
90: writeln('Направление: восток');
91..179: writeln('Направление: юго-восток');
181..269: writeln('Направление: юго-запад');
270: writeln('Направление: запад');
271..359: writeln('Направление: северо-запад');
end;
if a < 0 then begin
clrscr;
введите корректное значение.');
goto 1;
end;
if a > 360 then begin
clrscr;
введите корректное значение.');
goto 1;
end;
end.