Задать вопрос на языке Pascal: в записи каких трёхзначных чисел присутствует цифра 9?

через что проверяете?

Паскаль

ЕЩЕ РАЗ

"Там надо не именно сказать число это с 9 или нет. а надо вывести ряд чисел, в которых есть цифра 9 и подсчитать их количество" вот ещё что , оказывется)

извиняюсь,немного не понял

program n;var a,b,c,d:integer;beginwriteln('Введите трехзначное число');readln(d);a:=dmod10;d:=ddiv10;b:=dmod10;c:=ddiv10;if adiv9=1 then writeln('da');if bdiv9=1 then writeln('da');if cdiv9=1 then writeln('da') else writeln('no');end.(проверь ее)