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

Question

Информатика

Калидка

19 ноября, 21:24

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

+2

Ответы (1)

Знаешь ответ?

Данил · Answer 1

Var a, b: integer;

begin

write ('Введите a, b>>');

read (a, b);

if a
begin

while (b-1>a) do

begin

b:=b-1;

write (b, ' ');

end;

end

else write ('Неверные условия')

end.