Вычеслить значение у=корень х при х= [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.