Вопрос pascalкакое значение s будет в конце ? var s, k: integer; begin s : = 10; for k : = 3 to 0 do s : = s * 3; write(s); end.

Если строка  for k:=3 to 0 do записана верно  то s=10(начальные данные) так цикл в этом случае открываться не будет