Информатика, опубликовано 2018-08-22 22:46:42 by Гость
Составьте программу Паскаль вычисления суммы натуральных чисел не превышающих заданного числа N
Ответ оставил Гость
Var
a,n,i:integer;
Begin
Write(Введите число );
Readln(n);
for i:= 1 to n do
a:=a+i;
Write(Сумма всех натуральных чисел до n (включительно) равна ,a);
End.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.