Пример работы:
Объяснение: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. Введите название График функции.
// PascalABC.NET
begin
var k := ReadSeqIntegerWhile(p -> p <> 0)
.Count(p -> (p mod 4 = 0) and (p in Range(10,99)));
if k = 0 then
Write('NO')
else
Write(k)
end.