Турбо Паскаль прошу помощи

Жалоба
Вопрос

Даны два целых числа А и В (A>B). Вывести все целые числа, расположенные между данными числами (Не включая сами эти числа), в порядке их убывание, а также количество N этих чисел

В процессе 1
программирование 4 года назад 2 Ответов 154 Просмотров 0

Ответов ( 2 )

    0
    8 лет назад
    Ответить

    Цикл, разность

    0
    8 лет назад
    Ответить

    program gg;
    var A, B, i: integer;
    begin
    readln(A, B);
    for i:= A-1 downto B+1 do WriteLn(i);
    readln;
    end.

Ваш ответ