Ответ: «Не превышающих». У тебя «которые меньше».
Ответ: надо написать в программе паскаль
Ответ: Не, я таким непотребством не занимаюсь. Бери на 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(сумма);