program SumOfNumbersDivisibleBy13;
var
sum, i: integer;

begin
sum := 0;

for i := 10 to 99 do
begin
if i mod 13 = 0 then
sum := sum + i;
end;

writeln('Сумма двузначных чисел, которые делятся на 13: ', sum);
end.