Составьте программку в Pascal:Компьютер задаёт случайное двухзначное число Х, к примеру

program raf105;

var x,y,z:integer;

begin

x:=random(10,99);

writeln('Компьютер избрал число ',x);

y:=random(1,9);

writeln('Компьютер избрал число ',y);

z:= x mod 10;

x:= (x-z)*10;

z:= (x+z)+y*10;

writeln('Компьютер переместил 2-ое число в середину первого. Итог: ',z);

end.

var x,y,z:integer;

begin

   randomize;

   x:=1;

   repeat x:=random(100) until xgt;9;

   y:=random(10);

   z:=(x div 10)*100+y*10+(x mod 10);

   writeln('x=', x);

   writeln('y=', y);

   writeln('z=', z);

end.