Ввести натуральное число и вывести в строчку все числа от 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
Можно на кумире ?
Var i,n:Integer; Begin readln(i); for n:=1 to i do write(n, ' '); readln; end.
а вы знаете на кумире?