Вычисление суммы всех двузначных чисел - Pascal

составте программу для вычесления суммы всех двузначных чиесл

Листинг программы

program summ_dvuh_znach;
 var a: integer;
     summ: integer;
begin
for a:= 10 to 99 do summ:=summ+a;
writeln(summ);
end.

Объяснение кода листинга программы

Начинается объявление переменных:
- Переменная a типа integer (целое число).
- Переменная summ типа integer (целое число).
Задается диапазон значений для переменной a от 10 до 99 с шагом 1.
Инициализируется переменная summ значением 0.
Запускается цикл for, который будет выполняться от 10 до 99 (включительно) с шагом 1.
Внутри цикла значение переменной a прибавляется к значению переменной summ.
После выполнения цикла выводится значение переменной summ.
Код завершается.