Паскаль! вычислить произведение натуральных чисел, начиная от 12 до 18

240

257

Посмотреть ответы 2

Ответы на вопрос:

Masha110502

Информатика

4,5(36 оценок)

Var s,a: integer; begin s: =1; for a: =12 to 18 do s: = s * a; writeln (s); end . писал с телефона

JahKhalib228

Информатика

4,7(38 оценок)

169 / 2 = 84 остаток 1 84 / 2 = 42 остаток 0 42 / 2 = 21 остаток 0 21 / 2 = 10 остаток 1 10 / 2 = 5 остаток 0 5 / 2 = 2 остаток 1 2 / 2 = 1 остаток 0 выписываем результат и остатки в обратном порядке: 10101001 итого единиц в результате: 4