Ответ:
Объяснение:
единственное через дискриминант если он равен нулю . Если он больше нуля. Если он меньше нуля D=b^2-4ac это формула
Program n_1;
Var a, b, c, S, n: Integer;
Var q:Real;
Begin
Writeln('' Введите первое число'');
Readln(a) ;
Writeln('' Введите второе число'');
Readln(b) ;
Writeln('' Введите третье число'');
Readln(c) ;
S:=a+b+c;
n:=a*b*c;
q:=S/3;
Writeln(S) ;
Writeln(n) ;
Writeln(q) ;
end.
99 баллов у Троценко
1 запись
a->B2 =a*a*a->B3 =B3*B3*B3*B2->B4
a->B2 =a*a*a*a->B5 =B5*B5*B5*B5*B5->B6
a->B2 =a*a*a*a*a->B7 =B7*B7*B7*B7*B7->B8
a->B2 =a*a*a*a*a->B7 =B7*B7*B7*B5 ->B9
6+2=8 6-2=4 8+4=12 8-4=4 4+4=8 шестикутник-6,зірочка-2. ромбик-8,кружечок-4