0 / 0 / 0
Регистрация: 21.01.2018
Сообщений: 16
1

Дано трёхзначное число. Определить, входит ли в него цифра 3

02.02.2018, 08:09. Показов 13780. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Дано трёхзначное число. Определить:
А) входит ли в него цифра 3
Б) входит ли в него цифра а
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
02.02.2018, 08:09
Ответы с готовыми решениями:

"Дано трехзначное число. Определить входит ли в него цифра 4."
Надо решить "Дано трехзначное число. Определить входит ли в него цифра 4."

Дано трехзначное число. Определить входит ли в него цифра n
Помогитеее

Дано четырехзначное число. Определить входит ли в него цифра b
Дано четырехзначное число. Определить входит ли в него цифра b.Помогите решить плиз.Заранее...

Дано натуральное число N , определить входит ли в него цифра 3.
Нам говорили что надо это делать с использованием Mod и Div. Когда использую эти операторы то...

2
5067 / 2638 / 2349
Регистрация: 10.12.2014
Сообщений: 10,004
02.02.2018, 08:36 2
Лучший ответ Сообщение было отмечено dashkafil как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
function inNumber(n, a : Integer) : Boolean;
var r : Boolean;
begin
  r := n = a;
  while n <> 0 do
    begin
      r := r or (n mod 10 = a);
      n := n div 10;
    end;
  inNumber := r;
end;
 
var a, n : Integer;
begin
  Write('число = '); ReadLn(n);
  WriteLn('цифра 3 входит в число = ', inNumber(n, 3));
  Write('цифра a = '); ReadLn(a);
  if (a < 0) or (a > 9) then begin WriteLn('Это не цифра!'); Halt; end;
  WriteLn('цифра ', a, ' входит в число = ', inNumber(n, a));
end.
0
Почетный модератор
64291 / 47589 / 32740
Регистрация: 18.05.2008
Сообщений: 115,181
02.02.2018, 08:45 3
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
procedure cifra(a,b:integer);
begin
if(a mod 10=b)or(a div 10 mod 10=b)or(a div 100=b)then
writeln('Цифра ',b,' есть в числе')
else writeln('Цифры ',b,' нет в числе')
end;
var n,a:integer;
begin
repeat
write('Введите натуральное трехзначное число n=');
readln(n);
until (n>99)and(n<1000);
repeat
write('Введите цифру a=');
readln(a);
until a in [0..9];
cifra(n,3);
cifra(n,a)
end.
0
02.02.2018, 08:45
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.02.2018, 08:45
Помогаю со студенческими работами здесь

Дано двузначное число, входит ли в него цифра 3, входит ли в него цифра а
Задача № 56 Дано двузначное число Определить : а) входной ли в него цифра 3; в) входит ли в...

4.53. Дано трехзначное число. Определить: а) входит ли в него цифра 6, б) входит ли в него цифра n
4.53. Дано трехзначное число. Определить: а) входит ли в него цифра 6, б) входит ли в него цифра n

Надо решить "Дано трехзначное число. Определить входит ли в него цифра 4."
Дано трехзначное число. Определить входит ли в него цифра 4.

Дано двухзначное число. Определить, входит ли в него цифра 3 и входит ли в него цифра 4
Дано двухзначное число. Определить входит ли в него цифра 3 и входит ди в него цифра 4


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru