Да алгоритм крайне прост, всего одна формула: сумма = (N + 1) * N / 2.
Но раз тебе цикл "вхиле" нужен, то можно так:
var N = prompt(), сч = 1, сумма = 0;
while (сч <= N) {
сумма += сч++;
}
alert(сумма);
В качестве исходной фразы используйте:
Джинсы порезаны, лето, три полоски на кедах
2. Выполнить вручную шифрование сообщения при шифрующей системы Трисемуса.
В качестве исходной фразы используйте:
Под небом голубым есть город золотой
3. Выполнить вручную шифрование сообщения при лозунгового шифра.
В качестве исходной фразы используйте:
Я шагаю по пpoспектy, по ночномy гоpодy.
В качестве ключа используйте слово «Аквамарин»
4. Выполнить вручную шифрование сообщения при шифра табличной маршрутной перестановки.
В качестве исходной фразы используйте:
Я не знаю, где ошиблись мы в расчетах
5. Выполнить вручную кодирование сообщения методом RLE.
В качестве исходной фразы используйте:
РРппВ12уллл3336
6. Выполнить вручную кодирование сообщения методом RLE.
В качестве исходной фразы используйте:
еВпппВ11уфффуугггддд
7. Выполнить вручную кодирование сообщения методом RLE.
В качестве исходной фразы используйте:
ИВВВ111у
Заранее за ответы!
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.