Сколько существует "счастливых" четырехзначных билетов? "счастливым" считается билет,у которого сумма первых двух цифр равна сумме двух последних.

615 чисел.
Вот программа на Паскале ABC по их вычислению:
Program bilet;
var i:integer;
    s:string;
begin
for i:=1000 to 9999 do begin
                       s:=IntToStr(i);
                       if StrToInt(s[1])+StrToInt(s[2])=StrToInt(s[3])+StrToInt(s[4]) then writeln(i);
                       end;
end.