Var a, b, c:integer;
Begin
Writeln('vvedite chisla');
Readln(a,b,c);
If (a>b) and (a>c) then writeln(a);
If (b>a) and (b>c) then writeln(b);
If (c>a) and (c>b) then writeln(c);
End.
На всем протяжении блок схемы N и так не меняется)
Она называется полиномом седьмой степени. Математику учите...
1) 01000101011110000110001101100101<span>01101100
2) </span>0100000101100011011000110110010101110011<span>01110011
3) </span>010101110110100101101110011001000110111101110111<span>01110011
В двоичной СС =)</span>