Даны действительные числа а, b, с (а > 0). Полностью исследовать биквадратное уравнение ax4 + bх2 + с = 0 (если действительных корней нет, то должно быть выдано сообщение об этом, иначе найти действительные корни, сообщив, сколько среди них различных). C++ Решите

program kvadrat;

var i : integer;

begin

for i: = 10 to 100 do

writeln ( i: 2, i*i : 5);

readln;

end. 

первым человеком, если доверять , кому все таки удалось расшифровать   египетские иероглифы, был французский ученый египтолог жан-франсуа шампольон (1790-1832гг). он постарался составить полный список иероглифов (доступных и понятых им на те времена) и их греческих эквивалентов, создав таким образом основу для перевода всех остальных египетских иероглифических текстов.

#include < stdio.h> #include < stdlib.h> #include < conio.h> #include < math.h> int main(){  int x, y;   printf("\n vvedite x and y:   ");   scanf("%d" "%d", & x, & y);     if (x < y) printf("\n x = %d, y = %d", (x + y)/2, 2 * x * y);   else printf("\n x = %d, y = %d", 2 * x * y, (x + y)/2);   printf("\n\n to ");   getch( );   return 0; }

  вот первая программа. вторую сейчас пишу.

program p_1; var a,b: string; i,k: integer; begin k: =0; write('введите слово '); readln(a); write('введите символ '); readln(b); for i: =1 to length(a) do begin if a[i]=b then k: =k+1; if a[i]=b then writeln(i,' '); end; if k> =1 then writeln('да, встречается ',k,' раз, на позиции указанных сверху в столбик ')else writeln('нет'); end.