40 1. заданы коэффициенты квадратного уравнения a, b и с. составить бса решения квадратного уравнения, начав рассуждения со сравнения d> 0. 2. заданы три неравных числа a, b и с. составить алгоритм определения и вывода наибольшего из трёх чисел, начав рассуждения с пасы чисел a и с. решите через !

//====================1===================== float a, b, c; cout< < "введите a:   "; cin> > a; cout< < "введите b:   "; cin> > b; cout< < "введите c:   "; cin> > c; float d=b*b-4*a*c; cout< < "ответ:   "; if(d> 0) cout< < "x1  =  "< < (-b+sqrt(d))/2*a< < ", x2  =  "< < (-b-sqrt(d))/2*a; else if(d==0) cout< < "x  =  "< < -b/2*a; else cout< < "корней нет"; cout< < endl //====================2===================== float a, b, c; cout< < "введите a:   "; cin> > a; cout< < "введите b:   "; cin> > b; cout< < "введите c:   "; cin> > c; cout< < "наибольшее число:   "; if(a> c) if(a> b) cout< < "a ("< < a< < ")"; else cout< < "b  ("< < b< < ")"; else if(c> b) cout< < "c ("< < c< < ")";

program nm12;

var a, d : integer;

begin

    writeln (' vvedite diametr kruga i storony kvadrata ');

    readln (d);

    readln (a);

    if d< =a then writeln (' krug pomestits9 v kvadrate ')

              else writeln (' krug ne pomestits9 v kvadrate ');

    readln;

end.