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

    На языке Паскаль решить задачу: Вывести на экран в возрастающем порядке все трехзначные числа, в десятичной записи которых нет одинаковых цифр.

    • Автор:

      james32
  • Ответ:

    var    i,j,k:integer;begin for i:=1 to 9 do  for j:=0 to 9 do   if i<>j then    for k:=0 to 9 do      if (i<>k) and (j<>k) then  writeln(i*100+j*10+k)end.
    • Отвечал:

      oscarnwx1

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