Во вложении
-------------------
Это телефон, скайп и т.п.
Утилиты это нужные программы, которыми пользуются многие( типа: калькулятор, контакты)
Приложения это просто программы которые можно закачать (инстаграм, вк, игры всякие)
Может задачу недопонял. Но вот что вышло:
uses crt;
var n,i,s:integer;
begin
clrscr;
readln(n);
for i:=1 to n do
begin
s:=s+i;
end;
writeln(s);
readkey;
<span>end.</span>