Предмет: Информатика, автор: Дашаi158

Напишите программу, условие задачи в приложении

Приложения:

Ответы

Автор ответа: elenaklon

var a:integer;

begin

readln (a);

if a div 10 = a mod 10 then write ('NO') else

if a div 10 > a mod 10 then write ((a div 10 + a div 10*10)-a)

else write ((a mod 10 + a mod 10*10)-a);

end.

Дашаi158: спасибо большое, все работает

Дашаi158: вы не могли бы подумать еще над этой задачей, если сможете https://znanija.com/task/30194711 заранее спасибо!

Аноним: Вопрос: почему для двух одинаковых цифр у Вас выдается NO? По условию увеличивать можно на любое НЕОТРИЦАТЕЛЬНОЕ число. В данном случае увеличить надо на ноль, а ноль число не отрицательное, значит ответ 0.

Дашаi158: спасибо за поправку

Дашаi158: но тогда в каком случае вообще возможен ответ NO

Аноним: Я вообще не смог придумать случай, когда будет NO )))

Аноним: Ну что же, обычное дело: кривое условие. Не впервой)))

Дашаi158: понятно, спасибо)))

Аноним: Это олимпиады - из из года в год с одними и теми же кривыми условиями переписывают

Автор ответа: Аноним