Набрать текст программы и отладить ее работу в среде турбо паскаль. подобрать тестовые данные. протестировать. : дана кривая, заданная уравнением y=x2+c и прямая y=kx+b. определить, сколько общих точек имеют эти прямые, и найти их координаты.

Сначала надо найти аналитическое решение . определить координаты точек пересечения двух функций - это совместно решить уравнения, описывающего функции. теперь можно составить программу, предусмотрев в ней анализ случаев d< 0, d=0 и d> 0. uses crt; var   k,b,c,x1,x2,y1,y2,d: real; begin   clrscr;   write('введите через пробел c,k,b: '); read(c,k,b);   d: =sqr(k)-4*(c-b);   if d< 0 then writeln('точек пересечения нет')   else       if d=0 then begin           x1: =k/2; y1: =k*x1+b;           writeln('координаты точки пересечения (',x1: 0: 4,',',y1: 0: 4,')')       end       else begin           d: =sqrt(d);           x1: =(k-d)/2; y1: =k*x1+b;           x2: =(k+d)/2; y2: =k*x2+b;           writeln('координаты точек пересечения: ');           writeln('(',x1: 0: 4,',',y1: 0: 4,'), (',x2: 0: 4,',',y2: 0: 4,')')       end;   readkey end. тестовые решения: введите через пробел c,k,b: -2 1 1 координаты точек пересечения: (-1.3028,-0.3028), (2.3028,3.3028) введите через пробел c,k,b: 1 3 -5 точек пересечения нет введите через пробел c,k,b: 12 6 3 координаты точки пересечения (3.0000,21.0000)

Сколько слов столько и