Cоставить программу вычисления значений функций f(x) на отрезке a; b с шагом h. результат представить в виде таблицы , первый столбец которой - значения аргумента, второй - соответствующие значения функции. f(x)=x^2 *sin^2x +1

Var a,b,h,f,x: real; begin write('введите а и b: '); readln(a,b); write('введите h: '); readln(h); x: =a; write('x: ': 8); while x< =b do   begin   write(x: 8: 2);   x: =x+h;   end; writeln; write('f(x): ': 8); x: =a; while x< =b do   begin   f: =x*x*sqr(sin(x))+1;   write(f: 8: 3);   x: =x+h;   end; end.

program ncdkj;

uses crt;

var a,b,p,d,sd: integer;

begin

clrscr;

a: =10;

b: =10;

d: =1;

sd: =1;

p: =10*0,1;

repeat 

a: =a+p;

d: =d+1;

until a> 20;

repeat 

b: =b+p;

sd: =sd+1;

s: =s+b;

until s> 100;

case sd mod 7 of

0: writeln('сумма 100 км в 7');

1: writeln('сумма 100 км в 1');

2: writeln('сумма 100 км в 2'); и так до шести

case d mod 7 of

0: writeln('20 км в 7');

1: writeln('20 км в 1');

2: writeln('20 км в 2'); и так до шести

readln;

end.

надеюсь второе   правильно понял, вроде должно работать

 

Наивный алгоритм: используя два вложенных цикла, проверить все подстроки, являются ли они палиндромами. такой алгоритм будет работать o(|s|^2), что при ограничении |s| < = 10^5 потребует примерно 10^10 / 2 сравнений, что достаточно долго. оптимизация: в центре у палиндрома четной длины всегда пара одинаковых символов. их можно найти, а затем увеличивать длину до тех пор, пока это возможно. плюс этого наблюдения в том, что если пара попадется не в центре, то максимальная длина подстроки-палиндрома с центром в этой паре, будет ограничена сверху. однако в худшем случае (все символы одинаковы) всё равно придется произвести немалое число сравнений. однако можно решить и за линейное время. например, существует алгоритм манакера, основанный на том, что можно использовать информацию, что часть строки является палиндромом. а именно, если в длинную-длинную строку-палиндром входит другая подстрока-палиндром, то можно не начинать проверку заново, а использовать уже имеющуюся информацию. пример 1: "длинная" подстрока-палиндром: c bbaabbaabbc в которой известна подстрока-палиндром. тогда в строке есть симметричная подстрока-палиндром: cbbaa bbaabbc пример 2: "длинная" подстрока палиндром: bbaabbaabbaa зная, что в ней есть подстрока-палиндром bbaabbaabbaa, можно явные сравнения для подстроки с центром в bbaabb aabbaa начинать уже с  bbaa bbaabbaa если не хочется писать самостоятельно, алгоритм манакера легко находится.