Ввести натуральное число и вывести в строчку все числа от 1 до этого числа

Question

Ввести натуральное число и вывести в строчку все числа от 1 до этого числа

Answer 1

1: 1
2: 1 2
3: 1 3
4: 1 2 4
5: 1 5
6: 1 2 3 6
7: 1 7
8: 1 2 4 8

Comments

Можно на кумире ?

Answer 2

Var i,n:Integer;

Begin
readln(i);
for n:=1 to i do
   write(n, ' ');

readln;
end.

Comments

а вы знаете на кумире?

Answer 3

алг
нач
цел x,a,b
вывод "Введите целое натуральное число "
ввод x
a := 0
b := 1
нц x раз
нц пока b <= x
вывод b
b := b +1
кц
кц
кон