исправить ошибку
var i,n:real;
a:array[1..n ] of integer;
begin
write('Введите количество элементов n=');
read(n);
for i:=1 to n do readln(a[i]);

for i:=1 to n do
writeln ('a[',i,']=',a[i];
end.

​

Создание маркированного списка

Для создания маркированного списка нужно нажать на кнопку «маркеры» в вышеназванном меню, при этом не имеет значения, где в этот момент расположен курсор, в начале строки или в ее середине. В любом случае маркером будет отмечен весь абзац, в котором располагался курсор в это время.

Определение формата маркера

При нажатии стрелочки справа от кнопки «маркеры» появляется выпадающее меню, в котором отображаются последние использованные маркеры, библиотека маркеров и маркеры, используемые в документах по умолчанию. Определение нового маркера возможно здесь же. Под этим понимается выравнивание маркера и знак маркера, в качестве которого можно использовать символы и различные рисунки (при необходимости нужные маркеры можно загрузить из разных источников).

x = int (input()) #ввод х, х - целое число

s = 0 #переменная для суммы

if x == 0:

   print(s) #если х - нулевой, то сумма нечетных цифр равна 0

else:

   while x != 0:  #начинаем цикл поиска цифр

       c = x%10 # "отрезаем" от х последнюю цифру и записываем в переменную с

       if c != 0 and c%2 != 0:  #если цифра с делится на 2 с остатком, то она нечетная

           s = s + c #тогда мы ее прибавляем к s

       x = x // 10 #"отрезаем" от х последнюю цифру, а оставшееся число записываем в х

   print(s)