Составить программу вычисления функции на паскале АВС.NET на заданных промежутках и с заданным шагом h.

x∈[0,π]
h=π/8

Используя var, const, writeln и т.д.

Question

Информатика: Составить программу вычисления функции на паскале АВС.NET на заданных промежутках и с заданным шагом h. x∈[0,π] h=π/8 Используя var, const, writeln и т.д.

12345678901456619353 · Answer

begin var f: real - real := x - (sin(x)+cos(x))/(1+sqr(x)); PartitionPoints(0, Pi, 8).Tabulate(x - f(x)) .ForEach(x- writeln( x: ,x.Item1:7:3,    y: ,x.Item2:7:3)); end.или без косметики:begin PartitionPoints(0,Pi,8).Tabulate(x- (sin(x)+cos(x))/(1+sqr(x))).Print end.Примеры работ:...