Задание 14 Форматирование абзацев 1 В текстовом процессоре создайте новый документ.
2 Наберите черновик документа (Times New Roman, 14 пунктов, выравнивание по
левому краю) со следующим текстом:
Текст для ввода
Номер абзаца
Принтер
1
Для вывода документа на бумагу к компьютеру подключается
2
печатающее устройство — принтер. Существуют различные типы
принтеров.
Матричный принтер печатает с металлических иголок,
которые прижимают к бумаге красящую ленту.
3
Струйный принтер наносит буквы на бумагу, распыляя над
4
ней капли жидких чернил. С его создаются не только
черно-белые, но и цветные изображения.
В лазерном принтере для печати символов используется
5
лазерный луч. Это позволяет получать типографское качество
печати.
3 Выполните форматирование в соответствии со следующими требованиями:
Свойства абзаца
Форматирование символов
Номер
абзаца
Выравнивание
Междустрочный
интервал
Шрифт
Размер
Начертание
1
по центру
одинарный
Arial
14
полужирный
2
по левому краю
1,5 строки
Times New Roman
12
полужирный
3
По правому краю
двойной
курсив
4
По ширине
1,5 строки
подчеркнутый
5
По центру
одинарный
полужирный,
курсив
4 Сохраните файл в личной папке под именем Принтеры.rtf и закройте его.
Гипотенуза пересекает ось Х в точке с координатами (х1; 0), а ось Y - в точке с координатами (0;y2). Найдем эти координаты, считая коэффициенты a и b в уравнении прямой заданными.
Теперь можно определить номера четвертей n, в которых располагается гипотенуза.
var
a, b: integer;
f: Text;
begin
Assign(f, 'input.txt');
Reset(f);
Readln(f, a, b);
Close(f);
Assign(f, 'output.txt');
Rewrite(f);
if a < 0 then
if b < 0 then Writeln(f, '3') else Writeln(f, '1')
else
if b < 0 then Writeln(f, '4') else Writeln(f, '2');
Close(f)
end.