Паскаль abc. создать програму цикл

срочно дуже

program example_while; var i, N: integer; { объявляем переменные }begin i := 1; { Присваиваем i значение 1 } readln(N); { Считываем последнее число } while i <= N do {Как только i станет больше N, цикл прекратится (можно было бы написать просто <, но пришлось бы добавлять 1 к N) } begin {Открываем операторные скобки} write(i, ' '); {Выводим i} Inc(i); {увеличиваем i на один.} end; { закрываем скобки }end.

class Main{    public static void main(String[] args){        for(int i = 0; i < 10; i++){            System.out.println(i);};        };    };