Составьте блок схему: Отличникам студенческой молодежи с юга страны было предложено заполнить онлайн-анкету относительно их предпочтения не формальной деятельности. Всего анкета включала 5 вариантов. Каждый ученик мог выбрать только один вариант из следующих:
1. Поездка в Москву
2. Фильм в кинотеатре
3. Спектакль в театре
4. Снежные игры на горе
5. Шоколадная мастерская
Написать алгоритм, включающий данные анкеты пока не будет введено значение -100. Число 1 выражает выбор первого варианта (поездка в Москву), число 2 выражает выбор второго варианта (фильм в кинотеатре) и так далее.
Алгоритм должен вычислить и отразить:
А. Сколько студентов ответили на опрос?
B. Какую не формальную деятельность учащиеся предпочитают (т. е. ту, которая набрала максимальное количество голосов). Предположим, что нет ситуации для ничьи.
C. Сколько голосов получила формальная деятельность, которую выбрали студены(которая выйграла) .
Д. Если есть какое-то конкретное не формальное действие, получившее менее 5 голосов от учащихся, выведете, какая это именно не формальная деятельность, а рядом с ним чтобы было написаны слова «менее успешная идея».
procedure Draw(x, y, l, u : Real; t : Integer);
procedure Draw2(Var x, y: Real; l, u : Real; t : Integer);
begin
Draw(x, y, l, u, t);
x := x + l*cos(u);
y := y - l*sin(u);end;
begin
if t > 0 then
beginl := l/3;Draw2(x, y, l, u, t-1);Draw2(x, y, l, u+pi/3, t-1);
Draw2(x, y, l, u-pi/3, t-1);Draw2(x, y, l, u, t-1);end
else
Line(Round(x), Round(y), Round(x+cos(u)*l), Round(y-sin(u)*l))end;
begin
SetWindowSize(425,500);
SetWindowCaption('Фракталы: Снежинка Коха');
Draw(10, 354, 400, pi/3, 4);Draw(410, 354, 400, pi, 4);
Draw(210, 8, 400, -pi/3, 4);end.