Составьте алгоритм вычисления суммы всех натуральных чисел,не привышающих заданного натурального числа N . Проверьте алгоритм трассировкой. Напишите программу в Паскале.
Ответы
Ответ дал:
2
var i,n,x:integer;
a:array [1..100] of integer;
begin
write('Введите N: ');
readln(n);
for i:=0 to n do
x:=x+i;
write(x);
end.
Похожие вопросы
1 год назад
2 года назад
2 года назад
7 лет назад
8 лет назад