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

Question

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

Answer 1

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