Дано натуральное число N. Получить новое число М, кото­рое образуется из числа N путем...

Question

Дано натуральное число N. Получить новое число М, кото­рое образуется из числа N путем замены последней цифры на значение наибольшей цифры в записи числа N. Пример. N= 128 452, М= 128 458. На Pascal ABC

Comments

Где Вы этот Pascal ABC берете? Проект закрыт разработчиками в 2007 году. И уже 11 лет вместо него PascalABC.NET.

Answer 1

Var i,max: Integer;
n,m: String;
begin
max:=0;
readln(n);
for i:=1 to length(n) do
begin
if maxend;
m:=n;
m[length(m)]:=max;
writeln(m);
end.