Помогите:3 Вывести на экран все натуральные числа до заданного. (в паскале)

Var i, n: integer;
begin  write(Введите число: ); readln(n);   
for i := 0 to n do   begin   
write(i, );
end;
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.