Program;

var a,i: integer;

begin

for i: =10 to 99 do

read(a);

if (a mod 10+ a div 10=10) then

write(a);

end.

Где ошибка?

Открывающий тег: Он состоит из названия (обозначения) элемента (в нашем случае, <font>тег используется в HTML 4, чтобы указать шрифт, размер шрифта и цвет текста.

Тег <font> Не поддерживается в HTML5), помещённого внутри угловых скобок.  

Данный тег служит признаком начала элемента, с этого момента тег начинает влиять на следующее после него содержимое.

Далее следует:

Атрибут color - Задает цвет

Атрибуты содержат дополнительную информацию об элементе

Пробел между атрибутом и именем элемента (или предыдущим атрибутом, если у элемента уже есть один или несколько атрибутов).

Имя атрибута и следующий за ним знак равенства.

Значение атрибута, заключенное в кавычки.

Далее следует:

«текст выделен красным цветом» - контент.

Он содержит контент, который вы хотите показывать посетителям вашей страницы, — текст (текст выделен красным цветом).

Как видно, в нашем случае содержимым является простой текст.

Закрывающий тег: </font>  выглядит как и открывающий, но содержит слэш перед названием тега. Он служит признаком конца элемента.  

Объяснение:

Если нужна поясню любой момент в ответе. Успехов!

Код ко второй и восьмой задачам:

{2-nd task}

var t,p,x,a,y: real;

begin

   write('t = ');

   readln(t);

   write('p = ');

   readln(p);

   write('x = ');

   readln(x);

   write('a = ');

   readln(a);

   y:= (exp(ln(t)*p))*(exp(ln(x)*5))*(1 - (x - (exp(ln(a)*x)))/((exp(ln(x)*2)) + 5.3));

   writeln('y = ',y:0:2);

end.

{8-th task}

var x,a,y,b,r,q,d: real;

begin

   write('a = ');

   readln(a);

   write('y = ');

   readln(y);

   write('b = ');

   readln(b);

   write('r = ');

   readln(r);

   write('q = ');

   readln(q);

   write('d = ');

   readln(d);

   x:= ((exp(ln(cos(y))*a)) - (exp(ln((sin(exp(ln(r)*8*q*b)))/((exp(ln(d)*(2*a*b))) + 18.31);

   writeln('x = ',x:0:2);

end.