Паскаль. написать программу, вычисляющую значение y = корень x при x от 1 до 50 с шагом 2.

Виктория41116 Виктория41116    1   28.07.2019 08:40    0

Ответы
FUpp FUpp  19.08.2020 18:53
// 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)
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика