Даны два целых числа a и b (a < b). вывести все целые числа, расположенные между данными числами ( не включая сами эти числа), в порядке их убывания, а также количество n этих чисел.

skalli05 skalli05    3   15.06.2019 08:40    2

Ответы
katerinatumasjp02dx5 katerinatumasjp02dx5  12.07.2020 14:49
Var a,b,i,k :integer;
begin
read(a,b);
k:=0;
for i:= b -1 downto (a-1) do
begin k:=k+1;
write (i,' ');
end; 
writeln('Количество этих чисел = ', k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика