Вычеслить значение у=корень х при х= [1; 10] с шагом 1

// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
for var i := 1 to 10 do
  Writeln(i, ') y = ', sqrt(i));
end.