Программы из 5 команд и результаты их выполнения: 11111: 7^5 * 2^5 = 16807 * 32 = 537824 11112: 7^5 / 7 * 2^4 = 2401 * 2^4 = 38416 11122: 7^5 / 7^2 * 2^3 = 343 * 8 = 2744 11222: 7^5 / 7^3 * 2^2 = 49 * 4 = 196 12222: 7^5 / 7^4 * 2 = 7 * 2 = 14 22222: 7^5 / 7^5 = 1 (Сами числа вычислять не обязательно) Все другие программы будут давать в результате одно из перечисленных выше значений. Например, результат программы 12121 = результату программы 11122: 7^5 * 2 / 7 * 2 / 7 * 2 = 7^5 / 7^2 * 2^3 ответ: количество различных чисел = 6
Program odin; - название программы var i,n,k,j : integer; - введение переменных i,n,k,j типа integer (целое число) begin - начало программы i:=1; - присвоить переменной i значение 1 For i:=2 to n do - цикл в котором переменной i присваиваются значения от 2 до n ( i = 2, 3, 5 ... n) begin - начало цикла for k:=0; - k присваивается 0 For j:=2 to i-1 do цикл в котором переменной j присваиваются значения от 2 до i-1 if i mod j = 0 then k:=1; - если остаток от деления переменной i yf переменную j равно 0, то присвоить переменной k значение 0 if (k=0) and (n mod i = 0) then writeln(i); - если переменная k имеет значение 0 и остаток от деления переменной n на переменную i равно 0, то вывести на экран значение переменной i end; - конец цикла for end. - конец программы
1Конструктор
2Провод
3Шестерня