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

// PascalABC.NET 3.3, сборка 1576 от 16.11.2017// Внимание! Если программа не работает, обновите версию!beginfor var i := 1 to 10 do  Writeln(i, ') y = ', sqrt(i));end.