СОСТАВЛЕНИЕ ЗАДАЧИ (задачи «наоборот») 2.1. var n, i, a, k: integer; begin readln(n); k := 0; for i := 1 to n do begin readln(a); if (a mod 3 = 0) and(a mod 10 = 2) then k := k + 1; end; writeln(k) end.

Построить схему машинного алгоритма и составить Паскаль- программу решения задачи с оператора выбора Case по варианту условия, определяемому номером бригады (табл. 7.1). Необходимые значения селектора n для каждой из ветвей вычислять по формуле, приведенной в 4-й колонке таблицы.

Объяснение:

Построить схему машинного алгоритма и составить Паскаль- программу решения задачи с оператора выбора Case по варианту условия, определяемому номером бригады (табл. 7.1). Необходимые значения селектора n для каждой из ветвей вычислять по формуле, приведенной в 4-й колонке таблицы.

.

.

.

.

дпьащатш