Определите, что будет напечатано в результате работы следующей программы. Var s,k:...

Question

Определите, что будет напечатано в результате работы следующей программы. Var s,k: integer; Begin s:=1; for k:=1 to 5 do s:=s*k; write (s); End

Answer 1

Ответ:

120

Объяснение:

s = 1

k от 1 до 5

s = s * k

1)  s = s * k = 1 * 1 = 1

2) s = s * k = 1 * 2 = 2

3) s = s * k = 2 * 3 = 6

4) s = s * k = 6 * 4 = 24

5) s = s * k = 24 * 5 = 120