Решить задачу ** Паскале: Вычислите сумму данных 100 натуральных чисел. Вводятся 100...

Question

Решить задачу на Паскале: Вычислите сумму данных 100 натуральных чисел. Вводятся 100 чисел, сумму которых необходимо посчитать.

Answer 1

Var a, s ,i: integer;
begin
s:=0;
for i:=1 to 100 do begin
readln(a);
s:=s+a;
end;
writeln('Сумма введённых чисел = ', s);
end.

Comments

выводит частичное решение

---

всм?

---

решение верно на половину

---

что не верно?

---

я не знаю, это проверяет сайт робот

---

что пишет то? и ссылку дай

---

http://informatics.mccme.ru/mod/statements/view3.php?id=280&chapterid=342#1

---

сюда ответ загружаешь и он проверяет