Ответ:
//PascalABC.NET версия 3.2, сборка 1389
//Если программа не запускается, то обновите версию
uses System.Linq;
begin
writeln('III');
var a := ReadArrInteger('Документы', ReadInteger('n=')).ToList;
writeln;
while a.Any() do
begin
write(a[0], ' ');
a.RemoveAt(0);
if not a.Any then break;
write(a.Last, ' ');
a.RemoveAt(a.Count - 1);
if not a.Any then break;
var n := 0;
if a.Count > 1 then n := a.Count div 2 - 1;
write(a[n], ' ');
a.RemoveAt(n);
end;
end.
Объяснение:
Если СПТ умеет автоматически строить оглавление документа, да ещё размещать его как в конце, так и в начале по желанию пользователя, то это уже не форматер. А если СПТ позволяет подготовить на экране или включить в документ рисунок, выполненной другой программой, то независимо от плюсов и минусов в других графах перечня операций это — настольное издательство.
Такая классификация удобна пользователю-покупателю. Но и она не отражает сути вопроса, так как разработчики сложных систем, особенно в процессе развития удачных версий, стремятся привлечь покупателя «экзотическими» возможностями. При этом система, как будет показано ниже, не переходит в другой класс, но уловить это по перечню операций крайне трудно.
Итак, единого классификационного признака нам пока обнаружить не удалось. Но может быть этого и не нужно пользователю, к тому же только начинающему работать и жаждущему скорее приступить к делу, чем выслушивать «парламентские прения»? Говорят, «скупой (в данном случае — на время чтения) платит дважды», а конструктивная классификация имеет не абстрактный смысл, но позволяет оценить предполагаемую покупку не только по красоте упаковки…
Сначала, не заботясь о различиях других классов систем подготовки текстов, попробуем «отсечь» форматеры. В словаре [7] можно найти следующие определения:
V«Форматер (formatter)1 — программа или часть системы подготовки текстов, выполняющая форматирование. См. тж. text formatting.»…
«Text formatting (форматирование текста) — в системах подготовки текстов — преобразование текста в вид, в котором он должен печататься: формирование абзацев, центрирование заголовков, выравнивание полей, разбиение на страницы.»
1 терабайт=1 000 000 000 килобайт
2 в 20=1058576
2 в 30=1073741824
2 в 40=1099511627776
Статья содержит 8 стр, на каждой странице 32 строки, в каждой строке 32 символа⇒ умнажаем это всё друг на друга
8*32*32= 8192 это всего символов
8192*16= 131072 = 128
В задании требуется ввести код программы, описанной на странице 228 учебника и надо изменить программу так, чтобы она считала отклонения средней температуры каждого месяца от среднегодовой величины, должно получиться так:
Program Temperature;
var T: array[1..12] of real;
Dt:array[1..12] of real;
i:integer; Tsred:real;
begin
for i:=1 to 12 do begin
write('T[',i:2,'] = ');
readln(T[i]);
end;
Tsred:=0;
for i:=1 to 12 do
Tsred:=Tsred+T[i];
Tsred:=Tsred/12;
Writeln('Среднегодовая температура = ',Tsred:6:2);
for i:=1 to 12 do begin
Dt[i]:=T[i]-Tsred;
writeln('Dt[',i:2,']',Dt[i]:6:2);
end;
end.
Ну а результаты получите, когда запустите программу.