Найти значение всех двузначных чисел от 10 до 99

Program p1;
var   i,n,a:integer;
begin
n:=99;
a:=10;
for i :=10 to n do 
begin 
a:=a+i; 
end; 
writeln(a); 
readln;
end.

сначала найдём общее количество возможных слов. поскольку на первое место можно поставить любую букву, кроме й, общее количество возможных слов равняется 5 · 5 · 4 · 3 · 2 · 1 = 600. теперь определим, сколько слов содержат сочетание ае. пусть слово начинается с ае, тогда количество вариантов равняется 1 · 1 · 4 · 3 · 2 · 1 = 24. пусть ае это вторая и третья буквы слова, тогда количество вариантов равняется 3 · 1 · 1 · 3 · 2 · 1 = 18. пусть ае это третья и четвёртая буквы слова, тогда количество вариантов равняется 3 · 3 · 1 · 1 · 2 · 1 = 18. в случае, когда ае это четвёртая и пятая буквы слова, количество вариантов равняется 3 · 3 · 2 · 1 · 1 · 1 = 18. в случае, когда ае это пятая и шестая буквы слова, количество вариантов равняется 3 · 3 · 2 · 1 · 1 · 1 = 18. таким образом, количество кодов, которые может составить матвей, равняется 600 − 24 − 18 − 18 − 18 − 18 = 504.

ответ: 504.

Прямого кода. Прямой код двоичного числа совпадает по изображению с записью самого числа.
обратного кода. Обратный код для положительного числа совпадает с прямым кодом. Для отрицательного числа все цифры числа заменяются на противоположные (1 на 0, 0 на 1), а в знаковый разряд заносится единица.
дополнительного кода. Дополнительный код положительного числа совпадает с прямым кодом. Для отрицательного числа дополнительный код образуется путем получения обратного кода и добавлением к младшему разряду единицы.