Вывести таблицу деления чисел (свой порядковый номер делим на 2, 4, 6... , 20 с шагом 2) с двумя знаками после запятой. Сделать с помощью цикла  While

var  x, a: real;   i: integer;begin  write('Введите число ');  readln(a);  writeln('Таблица деления числа ', a, ' на целые четные от 2 до 20 (с 2 знаками после запятой)');  i := 2;  while i <= 20 do  begin    x := a / i;    writeln(a, '/', i:2, '=', x:0:2);    i := i + 2;  end;end.Тестовое решение:Введите число 27Таблица деления числа 27 на целые четные от 2 до 20 (с 2 знаками после запятой)27/ 2=13.5027/ 4=6.7527/ 6=4.5027/ 8=3.3827/10=2.7027/12=2.2527/14=1.9327/16=1.6927/18=1.5027/20=1.35