• Вопрос по информатике:

    Дано натуральное четырехзначное число,верно ли, что все его цифры различны?

    • Автор:

      popeye

  • Ответ:

    var a,b,c,d,e:integer;beginread(a);b:=a mod 10;a:=a div 10;c:=a mod 10;a:=a div 10;d:=a mod 10;a:=a div 10;e:=a mod 10;if (b<>c) and (b<>d) and (b<>e) and (c<>d) and (c<>e) and (d<>e) then write('net povtorov')else write('est povtori');end.

    • Отвечал:

      anayaixof
    • 0

    Ответов нет, но ты это испарвиш!

Еще 4 ненужных тебе вопроса, но это важно для поиска