Исходя из самого вопроса - тут не важно само выражение функции.
1. 7 { -6, -4, -2, 0, 2, 4, 6 }
Var k,n : Real;
Begin
n:=0;
k:=-6;
While k<=6 do
Begin
k:=k+2;
n:=n+1;
end;
Writeln('n = ',n);
end.
2. 7 { -2, -1.5, -1, -0.5, 0, 0.5, 1 }
Var k,n : Real;
Begin
n:=0;
k:=-2;
While k<=1 do
Begin
k:=k+0.5;
n:=n+1;
end;
Writeln('n = ',n);
end.
3. 3 { -3, -1, 1 }
Var k,n : Real;
Begin
n:=0;
k:=-3;
While k<=2 do
Begin
k:=k+2;
n:=n+1;
end;
Writeln('n = ',n);
end.
4. 7 { -1, -0.5, 0, 0.5, 1, 1.5, 2 }
Var k,n : Real;
Begin
n:=0;
k:=-1;
While k<=2 do
Begin
k:=k+0.5;
n:=n+1;
end;
Writeln('n = ',n);
end.
там не понятно фоткать научись
Думаю, таблица может быть произвольной. Главное, чтобы было место для ввода x и вывода у.
Например, смотри картинку...
<span>Строка состояния представляет собой горизонтальную полосу в нижней части окна документа Microsoft Word. В строке состояния отображаются данные о текущем состоянии содержимого окна и другие сведения, зависящие от контекста.
отображает
</span><span>Показывает номер страницы.
</span>число слов
язык
состояние проверки правописания. Во время поиска ошибок данный значок принимает вид книги, над которой движется карандаш. Изображение галочки свидетельствует об отсутствии ошибок. При обнаружении ошибки появляется пометка в виде буквы «Х». Для устранения ошибки дважды щелкните этот значок.