Объяснение:1. В ячейке A1 ввести название аргумента Х.
2. В ячейке A2 ввести название функции F(x).
3. В ячейке B1 ввести начальное значение интервала табулирования 0.
4. В строке меню «Главная» в группе «Редактирование» нажмите на кнопку «Заполнить» - «Прогрессия». Выберите расположение по строкам – Шаг 0,2 – Предельное значение 2 – ОК. В результате в строке появляется ряд значений аргумента х
5. В ячейке B2 ввести формулу =КОРЕНЬ(B1)/(B1+1).
6. Методом автозаполнения скопировать ее в ячейки C2:L2. Этот метод заключается в следующем: выделить ячейку B2, встать на маркер заполнения в правом нижнем углу ячейки, нажать левую клавишу мыши и протащить ее до ячейки L2. В результате в этих ячейках появится значение функции при соответствующих значениях х.
7. В строке меню «Главная» в группе «Ячейка» нажмите на кнопку «Формат» - «Формат ячеек». Далее выберите вкладку «Граница» и оформите таблицу.
8. Щелчком на первой ячейке выделите строку. В строке меню «Главная» в группе «Ячейка» нажмите на кнопку «Вставить» - «Вставить строки на лист».
9. В новой строке сделать объединение ячеек, ввести заголовок.
Построение графика.
10. Выделить ячейки B3:L3.
11. В строке меню Вставка, в группе Диаграммы, нажмите на кнопку График, выберите тип График.
12. Выделите диаграмму, щелкнув на нее левой кнопкой мыши.
13. В появившемся окне Работа с диаграммами выберите Макет.
14. В группе Данные нажмите Выбрать данные, Подписи горизонтальной оси, Изменить, в Диапазоне подписей оси поставьте курсор, мышью в рабочем окне выделите ячейки В2:L2 (там , где находятся значения Х), ОК, ОК.
15. В группе Подписи нажмите на кнопку Название диаграммы.
16. Введите название График функции.
var
x, y: integer;
n: integer;
sum: integer;
mindif: integer;
f: text;
begin
assign(f,'C:\27-A.txt');
reset(f);
readln(f, n);
sum := 0;
mindif := 20001;
while not eof(f) do begin
readln(f, x, y);
if x > y then
sum := sum + x
else
sum := sum + y;
if (abs(x - y) < mindif) and (abs(x-y) mod 3 <> 0) then mindif := abs(x-y);
end;
if sum mod 3 <> 0 then
writeln(sum)
else
writeln(sum - mindif);
end.
Объяснение: