Программа, выводящая на экран степени числа 2 от 2 до 10 включительно — Pascal(Паскаль)

var i:byte;
    s:word;
begin
s:=1;
for i:=1 to 10 do
 begin
  s:=s*2;
  writeln(s);
 end;
readln
end.