осле того, как текст набран и проверен, желательно придать ему внешний вид, облегчающий восприятие написанного. Для этого различные смысловые части документа принято выделять шрифтами разных гарнитур (например, с засечками и без засечек) или разных начертаний (курсивного, полужирного), отступами, дополнительными межстрочными интервалами (отбивками) и другими
Например, заголовок документа желательно набрать более крупно и разместить его по центру страницы, подписи к рисункам оформить курсивом, а номера страниц разместить в правом нижнем углу каждой страницы.
Присвоение параметров оформления определённым частям документа принято называть форматированием.
Форматирование может быть жёстким или мягким. При жёстком форматировании каждой конкретной части документа — символу, слову, абзацу или странице задаются определённые параметры отображения. При этом форматирование никак не связано с логической структурой документа и объекты, логически относящиеся к одному типу, могут оказаться (и почти всегда оказываются, как показывает практика) оформленными по-разному. Например, одна из подписей к рисункам не будет выделена курсивом, в отличие от остальных.
При мягком форматировании описывается внешний вид не конкретного фрагмента текста, а логической части документа — заголовков, основного текста, сносок, колонтитулов, а для каждой конкретной части документа задаётся только её роль в документе: например, «подпись к рисунку». Описание оформления для определённой логической части документа принято называть стилем.
При использовании стилей необходимо логически разметить документ, т. е. обозначить его структуру. Отмечается, что в документе является заголовком, что основным текстом, а что другими элементами. При этом каждый элемент примет внешний вид в соответствии с тем стилем, который для него определён.
Использование логической разметки документа и мягкого форматирования облегчает работу с большими и сложными по структуре документами и позволяет автоматизировать многие этапы работы с текстом — автоматически создавать оглавления, легко перемещаться по большим документам, быстро изменять оформление и многое другое
1
var
mas:array[1..100] of integer;
i,n:integer;
en,out:text;
res:real;
qw,qwe:string;
begin
n:=0;
i:=1;
write('Введите полный путь к импортируемому файлу: ');readln(qw);
write('Введите полный путь к экспортируемому файлу: ');readln(qwe);
assign(en,qw+'.txt'); assign(out,qwe+'.txt');
reset(en); rewrite(out);
while not Eof(en) do
begin
readln(en,mas[i]);
n:=n+mas[i];
inc(i);
end;
res:=(n/(i-1));
write(out,res);
close(out);
close(en);
end.
Там во вторую тупо добавляешь:
max:=-100001;
min:=100001;
if (mas[i]<0) and (mas[i] mod 2 = 0) and (mas[i]<min) then min:=mas[i];
if (mas[i]>0) and (mas[i] mod 2 = 1) and (mas[i]>max) then max:=mas[i];
if (max=-100001)or(min=100001) then writeln(out,'ERROR: please, rewrite yor file')
else
begin
writeln(out,min);
writeln(out,max);
Тоже такие же задачи решал)) лол). Ты не из 604??)))