Ответ: «Не превышающих». У тебя «которые меньше».

Ответ: надо написать в программе паскаль

Ответ: Не, я таким непотребством не занимаюсь. Бери на JS.

Ответ:

var

k,sum,N:integer;

begin

k:=1;

sum:=0;

readln(N);

while sum<N do begin

sum:=sum+k;

inc(k);

end;

writeln(sum);

end.

Ответ:

Да алгоритм крайне прост, всего одна формула: сумма = (N + 1) * N / 2.

Но раз тебе цикл «вхиле» нужен, то можно так:

var N = prompt(), сч = 1, сумма = 0;

while (сч <= N) {

 сумма += сч++;

}

alert(сумма);