подскажыте параграф 39 вопрос 7 семкакин 9класс... вопрос "составьте алгоритм вычесления...

Question

подскажыте параграф 39 вопрос 7 семкакин 9класс... вопрос "составьте алгоритм вычесления суммы всех натуральных чисел, не превышающих заданного числа N."

Answer 1

полагаю что алгаритм нужен на пакле, но всегда уточняй язык, а то так можно и на с++ написать, и гораздо короче...

 

program summa_n;

var n, i, a: integer;

begin

writeln ('enter N: ');

read(n);

a:=0;

for i:=0 to n do a:=a+i;

writeln('your summa = ', a);

end.