При копировании кода из IDE на сайт автоматически удаляется перенос строки. Будет прикреплен скриншот того, как должен выглядеть код
program p1;var N, i, s: integer;begins:=0;write('Введите N >> ');read(N);for i:=1 to N dos:=s+i;writeln('Сумма чисел от 1 до '+ N +': ' + s);end.