Паскаль.
Плиз
Написать программу, вычисляющую значение
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)

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку