Вводится трёхразрядное целое число. Определить, какую из цифр необходимо убрать из этого числа, чтобы оставшиеся две(без перестановок) образовали наибольшее двухразрядное число. Напишите, пожалуйста, программу для
PascalABC
Ответы на вопрос
Ответил dar290199
0
Ответил Саэсентис
0
прости что переспрашиваю, но у меня показывает вот это case Max(w1*10+w2,w2*10+w3,w1*10+w3) of
1 : writeln('Íóæíî óáðàòü ',w3);
2 : writeln('Íóæíî óáðàòü ',w1);
3 : writeln('Íóæíî óáðàòü ',w2);
end;
это правильно, или это ошибка?
1 : writeln('Íóæíî óáðàòü ',w3);
2 : writeln('Íóæíî óáðàòü ',w1);
3 : writeln('Íóæíî óáðàòü ',w2);
end;
это правильно, или это ошибка?
Новые вопросы