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

Введите два числа А и В. Проверьте, есть ли у них одинаковые цифры.

10-11 класс

Timur8 15 марта 2017 г., 6:41:09 (7 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Nabochka1
15 марта 2017 г., 8:15:48 (7 лет назад)

var
  s, s1: string;
  i: integer;

begin
  readln(i);
  s := IntToStr(i);
  readln(i);
  s1 := IntToStr(i);
  for i := 1 to length(s) do
    if (pos(s[i], s1) > 0) then
      s1 := '-';  if (s1 = '-') then
    writeln('Yes')
  else
    writeln('No');
end.

Ответить

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

Была произведена серия из 12 подбрасываний монетки. В результате каждого подбрасывания монетка может выпасть орлом или решкой с равной вероятностью.

Сколько бит информации будет нести в себе сообщение о том, что в этой серии было только пять выпадения монетки орлом, и все они следовали строго подряд. В ответе укажите целое число.

Помогите с пожалуйста, ребят )
MS DOS и Windows, сходства и различия

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

Всем привет! Помогите пожалуйста по информатике. Задача: ввести целое число и найти сумму его цифр. Пример: введите целое число:1234. Сумма цифр числа 1

234 равна 10. Задача: сумма цифр ввести целое число и определить верно ли, что в его записи есть 2 одинаковые цифры. Пример: введите целое число 1234 нет введите целое число 1224 да

1)Ввести целое число и найти произведение его четных цифр. Пример: Введите целое число: 1234. Произведение четных цифр числа 1234 равно

6.

2)Ввести целое число и определить количество черных и нечетных цифр.

Пример:

Введите целое число :12547

количество нечетных цифр:3

количество четных цифр:2

Автомат получает на вход пятизначное десятичное число. По полученному числу строится новое десятичное число по следующим правилам.1.Вычисляются два числа

- сумма первых трёх цифр и сумма последних трёх цифр.2.Полученные два числа записываются друг за другом в порядке не убывания (без разделителей).Пример.Исходное число:15177.Поразрядные суммы: 7 ,15.Результат: 715.Определите, сколько из приведенных ниже чисел могут получиться в результате работы автомата.2626 2618 2624 2628 2826 2426 1826 610.В ответ запишите только количество чисел ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!!



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