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

Question

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

vo10 · Answer

120Объяснение:s = 1k от 1 до 5s = s * k1)  s = s * k = 1 * 1 = 12) s = s * k = 1 * 2 = 23) s = s * k = 2 * 3 = 64) s = s * k = 6 * 4 = 245) s = s * k = 24 * 5 = 120...