Регистрация
Войти
Стать экспертом Правила
Информатика

Даны два целых числа A и В. Выведите все числа от A до B включительно, в порядке возрастания, если A < B, или в порядке убывания в противном случае.Входные данныеВводятся два целых числа.Выходные данныеВыведите ответ на задачу.Примерывходные данные110выходные данные1 2 3 4 5 6 7 8 9 10 НЕ ДО КОНЦА ПОНЯЛ, КАК ДЕЛАТЬ, Пожалуйста посчитайте

ОТВЕТЫ
var a,b,i:integer;
begin
read(a);read(b);
if(a<b)then    for i:=a to b do write(i, ' ') 
 else  for i:=b to a do write(i,' ');
end.
182
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам