Регистрация
Войти
Стать экспертом Правила
Информатика

Составить алгоритм для вычесления суммы с заданным числом N численного ряда (цикл LOOP) и выполнить проверку данного алгоритма. Писать программу для вычесления суммы НЕ НУЖНО!Просто составить алгоритм и выполнить проверку

ОТВЕТЫ

var sum,n,i:integer;

begin

readln(n);

sum:=0;

for i:=1 to n do

    sum:=sum+i;

writeln(sum);

readln;

end.

148
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам