Var a: array[1..10] of integer; i, p: integer; begin for i: =1 to 10 do readln(a[i]); p: =1; for i: =1 to 10 do if a[i] mod 10 = 5 then p : = p * a[i]; if p > 150 then writeln('верно') else writeln('не верно'); end.
dawlatowajana
29.04.2022
Команды: 1) *3 2) +1 т.к. умножать на 3 мы можем любое число, а делить, чтобы получить целое, нет, будем решать наоборот, получать из числа 25 число 2, вычитать 1 и делить на три (в том случае, если делится на 3). затем просто запишем последовательность команд в обратном порядке. 25 на 3 не делится, 25 - 1 = 24 (команда 2) 24 на 3 делится, 24 / 3 = 8 (команда 1) 8 на три не делится, 8 - 1 = 7 (команда 2) 7 на три не делится, 7 - 1 = 6 (команда 2) 6 на три делится, 6 / 3 = 2 (команда 1) записываем в обратном порядке: 12212 можем проверить: 2*3 = 6 6+1=7 7+1=8 8*3=24 24+1=25 ответ: 12212
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Определить, может ли шахматный конь за один ход попасть из клетки с координатами (x1, y1) в клетку с координатами (x2, y2