Написать программу на языке Pascal. Даны два целых числа A и B (при этом A≤B). Выведите все числа от A до B включительно.

1

Ответы и объяснения

  • Listr
  • середнячок
2013-01-30T12:00:12+00:00
Program 4isla; var a, b, i: integer; Begin Readln (a, b); For i:=a to b do Readln (i); Readln; End. Это если без проверки ограничения a<=b и без дружественного интерфейса. Readln, который после readln(i) служит для задержки экрана. Можно убрать, но не нужно.