Нужно составить программу Паскаль с for вывести на экран 1000;900;..;100

var    i,a : integer; begin a := 1100; for i := 1 to 10 do  begin   a := a -100;   writeln (a); // write (a,'; '); end; end.

// Нужно составить программу Паскаль с for вывести на экран 1000;900;..;100  Var i,x:word; begin    for i:=1000 downto 100  do //Если вместо слова to в цикле for поставить downto, то после выполнения каждого шага цикла переменная-счетчик будет не увеличиваться, а уменьшаться на единицу     begin        x:= i mod 100;        if x=0 then writeln (i);      end; end.