Запишите, сколько раз будет выполнен цикл, заданный в программе: Var s, k:integer; Begin S:=1; for k:=1 to 30 do s:=(k-5)*s; writeln(s) end.

30

Объяснение:

К=1 а і має повторюватися 30 раз

Если равнодействующая сила не равна нулю, тело будет двигаться неравномерно.
Опыт 2. Будем тянуть брусок с помощью нити или динамометра по поверхности стола (на тело действовать сила тяжести Fтяж = mg, сила реакции опоры N, сила тяги F и сила трения Fтер).
Если N = Fтяж, а сила тяги F будет больше силы трения Fтер, то тело будет двигаться неравномерно (скорость тела будет увеличиваться со временем).
Опыт 3. толкнет брусок так, чтобы он двигался по поверхности стола (на него будут действовать сила тяжести Fтяж, сила реакции опоры N и сила трения Fтер, поскольку N = Fтяж, то они компенсируют друг друга, и влиять на движение бруска будет только сила трения Fтер) брусок со временем остановится (сила трения всегда направлена против движения).

Если равнодействующая сила не равна нулю, тело будет двигаться неравномерно.
Опыт 2. Будем тянуть брусок с помощью нити или динамометра по поверхности стола (на тело действовать сила тяжести Fтяж = mg, сила реакции опоры N, сила тяги F и сила трения Fтер).
Если N = Fтяж, а сила тяги F будет больше силы трения Fтер, то тело будет двигаться неравномерно (скорость тела будет увеличиваться со временем).
Опыт 3. толкнет брусок так, чтобы он двигался по поверхности стола (на него будут действовать сила тяжести Fтяж, сила реакции опоры N и сила трения Fтер, поскольку N = Fтяж, то они компенсируют друг друга, и влиять на движение бруска будет только сила трения Fтер) брусок со временем остановится (сила трения всегда направлена против движения).