Ввести натуральное число и вывести в строчку все числа от 1 до этого числа
Ответы на вопрос
Ответил maksyakovlev
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
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
arslanrahhhh:
Можно на кумире ?
Ответил TheTr1bLs
0
var i,n:Integer;
Begin
readln(i);
for n:=1 to i do
write(n, ' ');
readln;
end.
Begin
readln(i);
for n:=1 to i do
write(n, ' ');
readln;
end.
Новые вопросы