Тренировочный цикл Васи состоит из N дней.В первый день он пробегает 1 км,а в каждый последующий-на 1 км больше,чем в предыдущий.Сколько км пробежал Вася за тренировочный цикл?

ПРИМЕР

Ввод:10
Вывод:55

Использовать цикл while.

в общем, на программу с while:Program solid;var n,i,s:real;beginread(n);writeln('кол-во дней=',n);i:=1;s:=0;while i<=n dobegini:=i+1;s:=s+1;end;writeln('Вася пробежит ',s,' км за тренировочный цикл');end.