Вивести на екран всі натуральні числа до заданого

Формулювання. Дано натуральне число. Вивести на екран всі натуральні числа до за-даного включно.

Рішення. 

Дане завдання розв'язується з використанням оператора циклу for. 

Нагадаємо, що за допомогою циклу for можна зробити задану кількість ітерацій (повторень) деяких операторів, які синтаксично укладені в вміст його тіла (так званого тіла циклу). При цьому деяка цілочисельна змінна змінюється від деякого стартового значення до деякого кінцевого (обидва значення включно), збільшуючись на одиницю з кожним повторенням тіла циклу.

Так як нам необхідно виводити натуральні числа, це означає, що вивід повинен завжди починатися з одиниці, і при цьому виводяться всі наступні за нею натуральні числа до тих пір, поки значення змінної циклу (зазвичай використовують змінну i) не досягне звичайного n (на останньому кроці значення змінної циклу дорівнюватиме n). Після цього цикл завершиться, і будуть виконані ті оператори, які йдуть безпосередньо за ним. 

program FromOneToN;
var
i, n: word;
begin
readln(n);
for i := 1 to n do begin
write(i, ' ')
end
end.

Нехай введено число 5. При вході i  дорівнює 1 і буде перевірено існування відрізка в заданих межах. Так як 1 менше 5, то відбудеться вхід в цикл, і будуть виконуватися наступні команди, поки не i перевищить n:

1) Виконання команд в тілі циклу;

2) Збільшення i на 1;

3) Повернення на крок 1.

Неважко зрозуміти, що в нашому випадку i буде приймати значення 1, 2, 3, 4, 5 і буде виведений  на екран рядок '1 2 3 45'.