Задание:
Определите, что будет напечатано в результате выполнения следующего алгоритма: Var s,k: integer; Begin s: =1; for k: =1 to 30 do s: =(k-5)*s; write (s); End.
Решение:
В результате выполнения этой программы будет напечатан 0 Если трассировать программу по шагам то мы увидим что s меняется в цикле вот так s1=-4s2=12 s3=-24s4=24 Начиная с 5 шага получаем (5-5)*s т. Е 0 и далее чтобы мы на 0 не умножали так и будет 0
Знаете другой ответ?