Решаем задачи Абрамян на Кумире. For12

For12. Дано целое число $$N$$ ($$> 0$$). Найти произведение $$1.1 *1.2 * 1.3 *…$$ ($$N$$ сомножителей).

Решение от Дмитрия:

алг For_12(арг цел N, рез вещ P)
нач
 вещ K
 цел I

 K:=1
 P:=1
 нц для I от 1 до N
  K:=K+0.1
  P:=P*K
 кц
кон

алг For_12(арг цел N, рез вещ P)

нач

вещ K

цел I

K:=1

P:=1

нц для I от 1 до N

K:=K+0.1

P:=P*K

кц

кон

Другие задачи из раздела For можно посмотреть здесь.