Question

Составление алгоритма ввести натуральное число и выписать в строку все числа от одного до этого числа. Срочно надо составить алгоритм!! Дам все баллы и с другого пользователя тоже дам баллы

Answer 1

Var i,N : Integer;
Begin
  Readln(N);
  For i:=1 to N do Write(i,' ');
end.