Запишите на языке паскаль программу,которая для произвольного двузначного числа определяет число,образованное перестановкой цифр исходного числа.

Program Zadacha;
var
    a, b: Integer;
Begin
    Write('Enter number ');
    ReadLn(a);
    
    b := (a mod 10)*10;
    b := b + (a div 10);
    
    WriteLn(b);    
    
    ReadLn;
End.

Program Cislo;
Var
    a, b: Integer;
Begin
    Write('Enter number ');
    Readln(a);
    
    b := (a mod 10)*10;
    b := b + (a div 10);
    
    Writeln(b);    
    
    Readln;

End;
End.