Написать программу на паскале, которая определяет, есть ли среди цифр натурального числа n цифра k.
ПрофиЗнания
2
28.01.2021 17:50
15
Другие вопросы по теме Информатика
lspkorvo
01.10.2019 11:10
sahrona04
13.04.2020 11:19
Rashid200413
13.04.2020 11:20
maksimananchenko
13.04.2020 11:20
Tomi200
06.07.2019 13:40
слмтл
06.07.2019 13:40
artkeyn1
29.02.2020 15:26
петро27
29.02.2020 15:15
Популярные вопросы
- Какой объем 0,1 моль-экв/л раствора NaOH потребуется для нейтрализации 0,126...
2 - . 4.Мембранный потенциал мышечного волокна лягушки в 1,15 раза больше, чем мембранный...
2 - Наибольшей электроотрицательностью обладает атом: А S Б Al В Si Г P...
1 - Python Здравствуйте, не могу понять как точно и коротко написать этот код желательно...
3 - какой газ и в каком количестве выделяется при взаимодействии 10,63 карбоната...
3 - Из точки O пересечения диагоналей квадрата ABCD к его плоскости восстановлен...
3 - Вычислите производную функции y=ln(3x2) при x=1...
2 - Задача №2. В одной комнате находится принцесса, а в двух других сидят тигры....
3 - Гоголь Н. В. Ночь перед Рождеством Автор: Главные герой: Основная мысль ...
3 - Какая масса KCl содержится в 250,0 мл раствора, если на титрование 25,0 мл его...
3
program NK;
var
K, N: integer;
begin
write('Число N: ');
readln(N);
write('Цифра К: ');
readln(K);
while (N <> 0) do
begin
if ((N mod 10) = K) then
begin
writeln('Есть');
halt;
end;
N := N div 10;
end;
writeln('Нет');
readln;
end.
Объяснение: