Question

Мата знает два очень важных числа - А и В. Все числа между А и В тоже очень важные для Маши. Саша пообещал Маше напечатать все очень важные для неё числа, а также посчитать их количество. Причём, если А < В, то Саша напечатает эти числа в порядке возрастания, а в противном случае - в порядке убывания.
Формат входных данных
Программе на вход подаются два очень важных для Маши числа А и В (- 100 < А < 100,
-100 < B < 100).
Формат выходных данных
В первую строку выведите сообщение о количестве очень важных для Маши чисел (см. Приме-ры). Далее выведите все очень важные для Маши числа так, как это пообещал сделать Саша.Паскаль

Answer 1

Ответ:

Объяснение:

program ImportantNumbers;

var

A, B, i: integer;

begin

readln(A, B);

if (A >= -100) and (A <= 100) and (B >= -100) and (B <= 100) then

begin

if A < B then

begin

writeln('There are ', B - A + 1, ' important numbers for Masha');

for i := A to B do

writeln(i);

end

else

begin

writeln('There are ', A - B + 1, ' important numbers for Masha');

for i := A downto B do

writeln(i);

end;

end

else

begin

writeln('Input numbers are not within the specified range.');

end;

end.