1)for i: =a to b do if (i mod 2 =0) and (i mod 3 =0) then writeln(i) построить блок-схему 2)program e1; var b,c,d: real; begin read (b,c); d: =sgrt(sgr(b) – 4*c); writeln (`x1=` +d)/2, ` x2=` , (-b-d)/2 end построить блок-схему заранее всем большое