Построить таблицу значений функции F для х имеющегося в пределах от x0 до xk с шагом h. Значения x0, xk, h задаются пользователем. Под цифрой 6

Желаемое количество знаков в дробной части указывается тут: $'{x,17:f10}{F,24:f10}'.Println - в данном случае оно равно 10 для обоих колонок.

Добрый вечер можете пожалуйста решить эти задачи за них дают максимум балов https://znanija.com/task/30204100 https://znanija.com/task/30204127 https://znanija.com/task/30204176 https://znanija.com/task/30204235 https://znanija.com/task/30204262 https://znanija.com/task/30204276

Если Вы будете продолжать направо и налево кидать свои просьбы под чужими ответами (что является спамом), можете добиться, что Вас просто забанят.

А как вот эта часть: F=arctg(x)+... ?

А это уж виноват автор вопроса. Там мало что не видно, где 5, а где 6, так мы что, еще должны догадаться. что запись функции начинается ВЫШЕ номера, под которым она записана?

// PascalABC.NET 3.3

begin

 var (x0,xk,h):=ReadlnReal3('x0, xk, h: ');

 var b:=1.5;

 var n:=round((xk-x0)/h);

 var x:=Range(0,n).Select((x,i)->x0+i*h);

 x.Foreach(x->Writeln(x:4:1,'  ',

  x<2?arctan(x)+sqrt(abs(x-2)):x=2?(5-b*b)+cos(pi*x):ln(x-2)*sin(x/2)));

end.

Пример:

x0, xk, h:  0 4 0.5

0.0  1.4142135623731

0.5  1.6883924803924

1.0  1.78539816339745

1.5  1.68990050443388

2.0  3.75

2.5  -0.657786013301077

3.0  0

3.5  0.398971968326155

4.0  0.630276947694634

PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018Внимание! Если программа не работает, обновите версию!

begin

 var (x0, h, xk) := ReadReal3('Введите через пробел x0,h,xk:');

 var b := ReadReal('Введите b:');

 for var i := 0 to Trunc((xk - x0) / h) do

 begin

   var x := x0 + i * h;

   var F := x = 2 ? (5 - b * b) * Cos(Pi * x) : Ln(x - 2) * Sin(x / 2);

   $'{x,17:f10}{F,24:f10}'.Println

 end

end.