помогите аа нужно составить програмку в паскале

Question

"найти количество чисел, сумма цифр которых равна А, а само число заканчивается цифрой B ( А и B вводятся с клавиатуры) "

*** Karri *** · Accepted Answer

давай задачу, поможем) ) 
 
program a1; 
var a:string; i:integer; 
begin 
a:='аффтар лох'; 
for i:=1 to 100 do 
 begin 
writeln(a); 
 end; 
end.

Анна · Answer

Извини за задержку… 
(Ночью я обычно сплю ;-) 
 
Вот готово: 
 
Введите сумму цифр натурального числа А = 5 
Число заканчивается на B = 0 
Ответ: бесконечное множество 
 
Введите сумму цифр натурального числа А = 0 
Число заканчивается на B = 5 
Ответ: нет таких чисел! 
 
Введите сумму цифр натурального числа А = 1 
Число заканчивается на B = 1 
Ответ: бесконечное множество