Дано n чисел составить программу для нахождения суммы этих чисел через цикл пока

Дано n чисел составить программу для нахождения суммы этих чисел через цикл пока
Гость
Ответ(ы) на вопрос:
Гость
Var i,n,s: integer;beginn:=10;while i < n+1 dobegins:= s + i;writeln(i,s:4);i:= i +1;end;end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы