Составить алгоритм для вычесления суммы с заданным числом N численного ряда (цикл LOOP) и выполнить проверку данного алгоритма. Писать программу для вычесления суммы НЕ НУЖНО!
Просто составить алгоритм и выполнить проверку
Просто составить алгоритм и выполнить проверку
More Questions From This User See All
Answers & Comments
var sum,n,i:integer;
begin
readln(n);
sum:=0;
for i:=1 to n do
sum:=sum+i;
writeln(sum);
readln;
end.