Написать программу:
К данному числу прибавить все числа от 1 до n.

Да на нем и надо было) Что то я тупанул и не указал) Спасибо)

На Паскале подойдет?program help;var a,n,i: integer;beginread (a,n);for i:=1 to n doa:=a+n;write (a)end.

Круто!