Решить ! даны два целых числа а и б (а< б) вывести на экран все целые числа расположенные между данными числами ( не включая эти числа , в порядке их убывания, а так же количество этих чисел. (паскаль цикл с предусловием)

program asd; var a,b,k: integer; beginreadln (a,b); b: =b-1; while (b> a) do beginwrite (b,', '); b: =b-1; k: =k+1; end; writeln; writeln (k); readln; end.

1. oc ( операционная система ) позволяет всем что происходит в компьютере.

2. windows , linux ( возможно ошибка в написании ) , mac os

3.относятся также диалоговые оболочки и сервисные программы.

сервисные программы – это программы обслуживания дисков (копирование, форматирование, «лечение» ),  сжатия файлов на дисках (архиваторы), борьбы с компьютерными вирусами и т.д. 

4. java,  turbo basic,  quick basic

5.системы программирования предназначены для программистов .

program xxx;

    var i, k, d, e, s : integer;

begin

  k: =0;

  for i: = 10 to 99 do

    begin

          d: = i div 10;

          e: = i mod 10;

          s: =d + e;

          if i mod s = 0 then k: =k+1

    end;

    write ('кол-во чисел которые делятся на сумму своих цифр=', k);

    readln

end.