Составить программу, которая удваивает все двузначные числа и печатает их

program raf105;

var i: integer;

begin

for i:=10 to 99 do

 writeln(i*2)

end.