Впрограмме алгоритм неверный, так дубликаты не найти. поэтому программа в основном переделана. var n: integer; a: array[0..9] of boolean; d,i: byte; r: boolean; begin writeln('введите натуральное число'); readln(n); for i: =0 to 9 do a[i]: =false; r: =false; while n> 0 do begin d: =n mod 10; if a[d] then begin r: =true; break end else a[d]: =true; n: =n div 10 end; if r then writeln('да') else writeln('нет') end.
Anastasiya Yevseeva948
19.09.2020
Если словесно. берём пустые сосуды. наполняем 5-литровый и переливаем в 7литровый. результат: 5литровый - пуст, в 7литровом - 5 литров. наполняем 5литровый и переливаем в 7литровый столько, чтобы 7литровый наполнился. результат: 7литровый полон ( 5было + 2литра из 5литрового). в 5литровом 3 литра(5 было - 2 пепелили в 7литровый). 7литровый опустошаем и в него переливаем содержимое 5литрового. результат: 5литровый пуст (перелили в 7литровый), в 7литровом 3 литра. наполняем 5 литровый и переливаем в 7литровый столько, чтобы 7литровый заполнился. результат : 7литровый полон ( 3литра было + 4литра из 5 литрового. в 5литровом остался литр (5 литров - 4литра перелили в 7литровый). требуемый литр в 5литровом. есть еще один способ: . берём также пустые сосуды. наполняем 7литровый. переливаем в 5литровый столько, чтобы 5литровый наполнился. результат: в 7литровом - 2 литра (5 перелили в 5литровый), 5 литровый полон. опустошаем 5 литровый и заливаем в него содержимое 7литрового. результат: 7 литровый - пуст, в 5литровом - 2литра. наполняем 7литровый и переливаем в 5 литровый столько, чтобы наполнить 5литровый. результат: 5литровый полон (2литра +3литра из 7литрового), в 7литровом - 4литра (7литров - 3литра перелили в 5литровый). 5литровый опустошаем и в него заливаем содержимое 7литрового. результат: 7литровый пуст, в 5литровом - 4литра. наполняем 7литровый и переливаем в 5литровый столько, чтобы наполнить литровый. результат: 5литровый полон(4литра +1литр из 7литрового), в 7литровом-6литров. опустошаем 5 литровый и заливаем в него из 7литрового столько, чтобы 5литровый заполнился. результат: 5литровый полон, в 7литровом - 1литр (6литров - 5литров перелили в 5литровый). искомый литр в 7литровом сосуде
куда отправлять?
//решение должно иметь от 20 до 5000 символов