Написать программу на языке программирования Паскаль. Дано натуральное число N. Найти сумму 1+2+3+4+5+…+N.
Написать программу на языке программирования Паскаль.
Дано натуральное число N. Найти сумму 1+2+3+4+5+…+N.
Гость
Ответ(ы) на вопрос:
Гостьvar
n, s, i: integer;
begin
write('Число: ');
readln(n);
s := 0;
for i:=1 to n do s:=s+i;
writeln('Сумма = ', s);
end.
Тестовое решение:
Число: 100
Сумма = 5050
Не нашли ответ?
Похожие вопросы