Var i,p:integer; beginp:=1;for i:= 20 to 50 doif(i mod 5 = 0) then p:=p*i;writeln('Произведение чисел кратных 5: 'p);end.
Программа для среды программирования Кумир:
использовать Робот
алг
нач
лог прав=да
цел x=0, y=0
нц
если (mod(div(y,2),2)=0) = (mod(x,2)=0) то закрасить все
выбор
при прав и справа свободно: вправо; x:=x+1
при не прав и слева свободно: влево; x:=x-1
при сверху свободно: вверх; прав:=не прав; y:=y+1
иначе выход
все
кц
кон
107
Исходные цепочки МАК НИЛ КОШ
1 шаг НКАМ ОЛИН ЛШОК
2 шаг ОМАН ПНИО МКОЛ
3 шаг ПНАО РОИП НЛОМ
Результат: РОАП СПИР ОМОН
102
б) 11221
в) 12211
Суть в том, чтобы идти от результата к исходному, то есть слева направо (в такому случаи операции заменяются на обратные, умножение на деление, а вычитание на сложение), получить число кратное 3, поделить на 3 несколько раз до тех пор пока следующее деление на 3 не сделает данное число меньше исходного.
101
Введём обозначения
x - назад 2
у - вперёд 3
Всего команд 40 поэтому х+у = 40. Также сказано, что команд назад 2 на 10 больше: х-у = 10
Составим систему уравнений.
![\left \{ {{x+y=40} \atop {x-y=10}} \right.](https://tex.z-dn.net/?f=+%5Cleft+%5C%7B+%7B%7Bx%2By%3D40%7D+%5Catop+%7Bx-y%3D10%7D%7D+%5Cright.+)
выразим из 2 уравнения х, получим: х = 10 + у
подставим этот х в 1 уравнение: 10 + у + у = 40
упрощаем: 2у = 30
упрощаем: у = 15
подставим в ранее полученное выраженный х: х = 10 + 15 = 25
Мы получили команд назад 2 - 25, то есть кузнечик в сумме сдвинулся назад на 2*25 = 50, а вперёд на 3*15 = 45. Если мы вычтем из 1 результата 2 то получим 5 - число указывает смещение кузнечика. То есть всю программу можно заменить одной командой: назад 5.