Найти сумму всех двузначных чисел, кратных 5. условный оператор не использовать

Воспользуемся признаками делимости.
Признак делимости на 5 гласит, что число делится на 5, если его последняя цифра 5 либо 0. Если мы не можем использовать условные операторы, то можем перечислить эти двузначные числа:
var
a : integer;
begin
a := 10+15+20+25+30+35+40+45+50+55+60+65+70+75+80+85+90+95;
writeln(a);
end.
либо можем красиво оформить в цикле

var
a,i: integer;
begin
a := 0;
i := 0;
while i <> 100 do
begin
a := a + i;
i := i + 5;
end;
writeln(a-5);
end.