Question

Составить программу вычисления функции
Y=sin(x^2+1.67*pi)
Для значений x, принадлежащих диапазону (0-15). Результат вывести в виде таблицы

Answer 1

===== PascalABC.NET =====

begin

 var n := ReadInteger('Сколько точек будете вводить?');

 for var i := 1 to n do

 begin

   var x := ReadReal;

   Writeln(x:10:5, Sin(Sqr(x) + 1.67 * Pi):20:15)

 end

end.

Чтобы получить вид таблицы, после ввода числа точек нужно в следующей строке вводить весь набор х сразу и через пробел