Дано натуральное число N (водиться с клавиатуры). Написать программу, выводящую на экран натуральные числа от 1 до N

Question

Нов

10 ноября, 00:27

+1

Ответы (1)

Знаете ответ?

Маря · Answer 1

Program Task;

Var i, N: Integer;

Begin

Write ('N = ') ;

ReadLn (N) ;

For i : = 1 To N Do

Write (i, ' ') ;

ReadLn;

End.