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

Question

Информатика

Петеха

13 июня, 05:06

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

+5

Ответы (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.