profile
Размещено 4 года назад по предмету Информатика от ера1213

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

  1. Ответ на вопрос
    Ответ на вопрос дан Аккаунт удален
    // PascalABC.NET 3.3, сборка 1547 от 07.10.2017
    // Внимание! Если программа не работает, обновите версию!

    begin
      var c:=0;
      for var i:=100000 to 999999 do begin
        var a:=i.ToString.ToCharArray;
        if a.Distinct.Count=5 then begin
          c+=1;
          if c<7 then Print(i)
          else begin Println(i); c:=0 end
          end
        end
    end.

    Результат (приведено только начало)
    100234 100235 100236 100237 100238 100239 100243
    100245 100246 100247 100248 100249 100253 100254
    100256 100257 100258 100259 100263 100264 100265
    100267 100268 100269 100273 100274 100275 100276
    100278 100279 100283 100284 100285 100286 100287
    100289 100293 100294 100295 100296 100297 100298

    Таких чисел 408 240 и они займут 58 320 строк


    1. Ответ на вопрос
      Ответ на вопрос дан ера1213
      дякую))))
Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 5 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 6 класса 1. укажите личное местоимение: 1) некто 2) вас 3) ни с кем 4) собой 2. укажите относительное местоимение: 1) кто-либо 2) некоторый 3) кто 4) нам 3. укажите вопросительное местоимение: 1) кем-нибудь 2) кем 3) себе 4) никакой 4. укажите определительное местоимение: 1) наш 2) который 3) некий 4) каждый 5. укажите возвратное местоимение: 1) свой 2) чей 3) сам 4) себя 6. найдите указательное местоимение: 1) твой 2) какой 3) тот 4) их 7. найдите притяжательное местоимение: 1) самый 2) моего 3) иной 4) ничей 8. укажите неопределённое местоимение: 1) весь 2) какой-нибудь 3) любой 4) этот 9. укажите вопросительное местоимение: 1) сколько 2) кое-что 3) она 4) нами 10. в каком варианте ответа выделенное слово является притяжательным местоимением? 1) увидел их 2) её нет дома 3) её тетрадь 4) их не спросили

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.