Паскаль.ПлизНаписать программу, вычисляющую значение y = корень x при x от 1 до 50 с шагом 2.
Паскаль.
Плиз
Написать программу, вычисляющую значение
y = корень x при x от 1 до 50 с шагом 2.
Гость
Ответ(ы) на вопрос:
Гость// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
begin
Range(1,50,2).Tabulate(x->sqrt(x)).Println(NewLine)
end.
Результат
(1,1)
(3,1.73205080756888)
(5,2.23606797749979)
(7,2.64575131106459)
(9,3)
(11,3.3166247903554)
(13,3.60555127546399)
(15,3.87298334620742)
(17,4.12310562561766)
(19,4.35889894354067)
(21,4.58257569495584)
(23,4.79583152331272)
(25,5)
(27,5.19615242270663)
(29,5.3851648071345)
(31,5.56776436283002)
(33,5.74456264653803)
(35,5.91607978309962)
(37,6.08276253029822)
(39,6.2449979983984)
(41,6.40312423743285)
(43,6.557438524302)
(45,6.70820393249937)
(47,6.85565460040104)
(49,7)
Не нашли ответ?
Похожие вопросы