Для каждого x, изменяющегося от a до b с шагом h, найти значения функции Y(x), суммы S(x) и |Y(x)–S(x)| и вывести в виде таблицы. Значения a, b, h и n

вводятся с клавиатуры. Так как значение S(x) является рядом разложения функции

Y(x), при правильном решении значения S и Y для заданного аргумента x (для

30

тестовых значений исходных данных) должны совпадать в целой части и в первых

двух-четырех позициях после десятичной точки.

Работу программы проверить для a = 0,1; b = 1,0; h = 0,1; значение

параметра n выбрать в зависимости от задания

1. utfa.fps

2.какую программу?

3. x(n)=5n²-4n-1

xn-нечётное тогда, когда n-чётное

x(0)=-1

x(2)=11

x(4)=63

x(6)=155

x(8)=287

x(10)=459

x(12)=671

x(14)=923

x(16)=1215

x(18)=1547

x(20)=1919 

текст: happy new year, dear содержит 30 символов. при кодировании текста с acsii каждый символ кодиреутся 8 битами или 1 байтом, следовательно

30 символов = 30 байт или  30 * 8 = 240 бит

а где сама таблица? все равно она везде одинаковая, так что держите фрагмент ваш:

byck is my dog.

1) элемент с номером k заменяется на 2

var

a: array [1..20] of integer;

i,n,k: integer;

begin

readln(n);

for i: =1 to n do

begin

a[i]: =random(50);

write(a[i]: 3);

end;

writeln;

readln(k);

a[k]: =2;

for i: =1 to n do

write(a[i]: 3);

end.

2) элемент вставляется в массив остальные элементы сдвигаются вправо

var a: array [1..20] of integer; i, n, k: integer;

begin readln(n); for i : = 1 to n do begin a[i] : = random(50); write(a[i]: 3); end; writeln; readln(k); for i: =n+1 downto k do a[i]: =a[i-1]; a[k] : = 2; for i : = 1 to n+1 do write(a[i]: 3); end.