Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 978 ответов!

Дано натуральное число определить есть ли в нем цифра a

5-9 класс

CЕрЁжА1OO 24 окт. 2013 г., 15:12:11 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Anisimova15032012
24 окт. 2013 г., 17:46:49 (10 лет назад)


Function ЕстьЦифра(ччч, ццц) 
ЕстьЦифра = False 
ццц1 = ччч Mod 10 
ччч1 = (ччч - ццц1) / 10 
If ччч1 < 10 Then 
If ччч1 = ццц Or ццц1 = ццц Then 
ЕстьЦифра = True 
End If 
Else 
If ццц1 = ццц Then 
ЕстьЦифра = True 
Else 
ЕстьЦифра = ЕстьЦифра(ччч1, ццц) 
End If 
End If 
End Function 
Sub ppp() 
число = Cells(2, 1) 
цифра = Cells(2, 2) 
If ЕстьЦифра(число, цифра) Then 
Cells(2, 3) = "ДА" 
Else 
Cells(2, 3) = "НЕТ" 
End If 
End Sub 

а вот результат: 

+ 0 -
Luiza020397
24 окт. 2013 г., 20:00:18 (10 лет назад)

какое натуральное число

+ 0 -
Killer415
24 окт. 2013 г., 22:45:15 (10 лет назад)

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

Ответить

Другие вопросы из категории

На берегу реки стоит крестьянин с лодкой, а рядом с ним -волк,коза и капуста. Крестьянин должен переправиться сам и перевезти волка,козу и капусту на

другой берег. Однако в лодку кроме крестьянина помещается либо только волк,либо только коза,либо только капуста.Оставлять волка с козой либо козу с капустой без присмотра нельзя- волк может съесть козу,а коза-капусту.Как должен вести себя крестьянин? Оформите план переправы любым известным вам способом .

для каких целей могут использовать компьютер

1. физик
2. конструктор
3. писатель
4. бухгалтер
5. врач

Читайте также

1. Дано натуральное число n. Определить есть ли в нем цифра x. (x, n - вводятся с клавиатуры)

2. Напишите программу, которая вводит последовательность целых ненулевых чисел, признак окончания ввода - число 0. Выясните есть ли в ней хотя бы одна пара одинаковых "соседних" чисел. СРОЧНО!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

дано натуральное число N, Написать ему выводящую на экран последовательность натуральность натуральных чисел от 1 до N, задание 2 дано натуральное число

N, Написать ему выводящую на экран последовательность натуральность натуральных чисел отN до 1, номер 3 Даны натуральные числа N и К.Написать программу выводящую на экран последовательность из N чисел , каждое из которых равно К хотя бы что нибудь решите помогите очень надо!!!!!!!!!



Вы находитесь на странице вопроса "Дано натуральное число определить есть ли в нем цифра a", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.