Даны два целых числа A и B. Вывести в порядке возрастания все целые числа, расположенные между A и B (включая сами числа A и B), а также количество N этих чисел — Pascal(Паскаль)

program f2;
var A, B, i, count: integer;
begin
    read(A, B);
    for i := A to B 
        do write(i, ' ');
    count := B - A + 1;
    writeln; write( 'Количество чисел - ', count);
end.

Leave a Comment

+ 63 = 69