подскажыте параграф 39 вопрос 7 семкакин 9класс... вопрос "составьте алгоритм вычесления суммы всех натуральных чисел, не превышающих заданного числа N."
полагаю что алгаритм нужен на пакле, но всегда уточняй язык, а то так можно и на с++ написать, и гораздо короче...
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.
Оцени ответ
