Вычислите сумму данных N натуральных чисел. Входные данные Вводится число N,

Вычислите сумму данных N естественных чисел. Входные данные Вводится число N, а потом N чисел, сумму которых нужно вычислить. Выходные данные Выведите единственное число - сумму введенных чисел. В Pascal ABC

Задать свой вопрос
1 ответ

program sum;
var N, b, s: integer;
// N количество чисел, b число,  s сумма введенных чисел.
begin
writeln(Введите количество чисел);
readln(n);
writeln(Введите числа );
s:= 0;
for i:integer:=1 to N do
begin
readln(b);
s:= s + b;
end;
Writeln(Сумма введенных чисел: , s)
end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт