Объяснение:
Схе́ма Го́рнера (или правило Горнера, метод Горнера, метод Руффини-Горнера) — алгоритм вычисления значения многочлена, записанного в виде суммы мономов (одночленов), при заданном значении переменной. Метод Горнера позволяет найти корни многочлена[1], а также вычислить производные полинома в заданной точке. Схема Горнера также является простым алгоритмом для деления многочлена на бином вида {\displaystyle x-c}x-c. Метод назван в честь Уильяма Джорджа Горнера, однако Паоло Руффини опередил Горнера на 15 лет, а китайцам этот был известен еще в XIII веке.
Код:
program Hello;
var
a: array [1..7] of integer;
i: integer;
begin
writeln('Введите элементы массива:');
for i:=1 to 7 do
read(a[i]);
write('Вывод элементов массива: ');
for i:=1 to 7 do
begin
if a[i] mod 2 <> 0 then
write(a[i],' ');
end;
end.