Var s: k integer begin s: =10; for k: =1 downto 11 do s: =s+15; writeln(s) end.

Если исправить синтаксические ошибки:
Var s,k: integer;
то:
В цикле for k:=1 downto 11 do s:=s+15; начальное значение (1) меньше конечного (15), поэтому тело цикла не выполнится ни разу. Значение переменной s останется равной 10, т.е. на экран будет выведено 10