Pascalabc.net если можно то сделайте по простому после ярмарки к вам подошел мужчина с немного странными взглядом. он сказал, что он ремесленник и изготавливает детские игрушки. более того, за изготовление игрушки он просит от казны всего один сентенниаль (местная валюта). но за каждую следущую игрушку он хочет на один сентенниаль больше, чем за предыдущую. рассчитайте сколько сентенниалей предстоит заплатить за х игрушек. формат входных данных вводится целое число х (1 < = x < = 1000) формат выходных данных выводится целое число сентиннелей, которые предстоит заплатить казне за х игрушек примеры входные данные 5 выходные данные 15
begin
var x:=ReadInteger;
writeln((1+x)*x div 2);
end.
Пример:
6
21