Помогите пожалуйста)пользователь вводит пятизначное число необходимо составить обратное число, заменив четные значения разрядов на нечетные и наоборотПаскаль
var?
n, m: longint;
a: byte;
begin
readln(n);
m := 0;
while n>0 do begin
a := n mod 10;
n := n div 10;
m := m*10 + a;
end;
writeln(m);
readln;
end.
а что обозначает 7 строчка?