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

Ответ:

Сорян паскаль не знаю , могу скинуть на С++

Разбираешься в инфе , поймёшь

#include <iostream>

using namespace std ;

int main {

\ не важно что выше

int num , k , o , s , l; \ объявляем числа  

l, o , s , k ,num = 0 ;  \ чтобы в компиле гадости не было

cin >> num >> k ; \ вводим их c клавы

while (num >= 1) {

 s = num ;

 o = s%10 ;

     if (o <= k){ // цикл на проверку условию задачи

     l += 1 ;

     }

 num = num % 10 ;

}

cout << l ; // выводим ответ

\ не важно что ниже

return 0 ;

}

Ответ:

Реализация на Python 3

Объяснение:

print('Введите число')

x = int(input())

print('Введите цифру')

y = int(input())

x = str(x)

kol = 0

for i in x:

i = int(i)

if i < y:

kol += 1

print('количество цифр = ', kol)