Даны два целых числа A и В. Выведите все числа от A до B включительно, в порядке возрастания, если A < B, или в порядке убывания в противном
5-9 класс
|
случае
var a,b:integer;
begin
readln (a,b);
If a>b then
for a:=a-1 downto b+1 do
writeln (a)
else
for a:=a+1 to b-1 do
writeln (a);
end.
Другие вопросы из категории
Нужно решение
Вопрос не по теме.
Скажите как починить верхнюю кнопку блокироки на айфоне 4s без несения в сервис.Помогите!!!!1
И с другим заданием
Читайте также
Входные данные: ввести два целых числа А,В (1 <=А,В<=10).
Входные данные: вывести произведение всех целых чисел от А до В включительно.
Формат входных данных
Первая строка входного файла содержит два целых числа A и B (1 <= A, B <= 10^9).
Формат выходных данных
Выведите ответ к задаче.
ствния все целые числа расположенные между ними(включая сами числа)а так же кол-во N этих чисел, заранее благодарю
целые числа, расположенные между A и B (не включая числа A и B), а
также количество N этих чисел.
от A до B включительно.
2)Даны натуральные числа от A до B(A<B). Найти произведение тех из них, которые делятся на 3 и не делятся на 4.
3)Ангелина узнав, что Боря занимается спортом, решила не отставать. Она каждый день делала от 3 до 5 упражнений на икры (вводится во время выполнения программы) и 5 упражнений на пресс. Сколько упражнений она сделала за 5, 10 и 13 дней. (количество упражнений на икры на каждый день вводится отдельно)