Как составить на языке Паскаль программу вычисления суммы всех натуральных чисел, не превышающих заданного натурального числа N?
Вообще с Паскалем у меня полный завал! Если знаете как, то напишите! Желательно с объяснениями, буду благодарна!
var sum,n,i:integer;
begin
readln(n);
sum:=0;
for i:=1 to n do
sum:=sum+i;
writeln(sum);
readln;
end.
Оцени ответ
