Вывести столбиком следующие числа от 2.1 до 2.8 — Pascal(Паскаль)

uses crt;
var
i:integer;
begin
for i:=1 to 8 do
writeln('2.',i);
readln;
end.