Решить ! даны два целых числа а и б (а< б) вывести на экран все целые числа расположенные между данными числами ( не включая эти числа , в порядке их убывания, а так же количество этих чисел. (паскаль цикл с предусловием)
program asd; var a,b,k:integer; begin readln (a,b); b:=b-1; while (b>a) do begin write (b,', '); b:=b-1; k:=k+1; end; writeln; writeln (k); readln; end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
