Чему будет равно значение переменной m после выполнения программы?
var k, m:word;
begin
m:=1; for k:=3 downto 1 do; inc(m);
end;

Для просмотра статистики ответов нужно залогиниться.