Определить количество натуральных трехзначных чисел сумма цифр которых равна заданному числу N
X:=0;
for i:=10 to 99 do
begin
s:=n - i mod 10 - i div 10;
if (s>=0) and (s<10) then x:=x+1;
end;
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
