Блок-схема(алгоритм ) нарисовать по этой программе! input "kolichestvo okrugov. k="; k input "kolichestvo partiy. m="; m input "porog yavki izbirateley (v %). p="; p dim g(k, m + 1) dim pr(k, 1) for i = 1 to k cls print "okrug "; i g(i, 0) = i for j = 1 to m print "golosov za partiyou "; j; input g(i, j) pr(i, 1) = pr(i, 1) + g(i, j) next j input "ne golosovalo "; g(i, m + 1) pr(i, 0) = i pr(i, 1) = 100 * pr(i, 1) / (pr(i, 1) + g(i, m + 1)) next i cls for i = 1 to k for j = 1 to k if pr(i, 1) > pr(j, 1) then x = pr(i, 1) y = pr(i, 0) pr(i, 1) = pr(j, 1) pr(i, 0) = pr(j, 0) pr(j, 1) = x pr(j, 0) = y end if next j next i print "itogi po golosovavshim" print "okrug #", "golosovalo (%)", "pobedila partia #" for i = 1 to k print pr(i, 0), pr(i, 1), if pr(i, 1) > = p then print "yes. sostojlis", max = 0 for j = 1 to m if g(pr(i, 0), j) > max then max = g(pr(i, 0), j) x = j end if next j print x else print "no. ne sostojlis" end if next i
