Question

Написать программу в паскале. Найдите сумму 1+2+3.....+99

Answer 1

sum:=0;
for i:=1 to 99 do
sum:=sum+i;