Вводится трёхразрядное целое число. Определить, какую из цифр необходимо убрать из этого...

0 голосов
23 просмотров

Вводится трёхразрядное целое число. Определить, какую из цифр необходимо убрать из этого числа, чтобы оставшиеся две(без перестановок) образовали наибольшее двухразрядное число. Напишите, пожалуйста, программу для
PascalABC


Информатика (20 баллов) | 23 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Задача решена на ABC Pascal

(440 баллов)
0

прости что переспрашиваю, но у меня показывает вот это case Max(w1*10+w2,w2*10+w3,w1*10+w3) of
1 : writeln('Íóæíî óáðàòü ',w3);
2 : writeln('Íóæíî óáðàòü ',w1);
3 : writeln('Íóæíî óáðàòü ',w2);
end;
это правильно, или это ошибка?