Напишите программу в паскале, которая будет вычислять сумму N целых чисел.

Напишите программку в паскале, которая будет вычислять сумму N целых чисел. Количество чисел N и сами числа юзер водит с клавиатуры.


Окно вывода:
Введите количество чисел для сложения: 3
1 число: 9
2 число: 3
3 число: 1
Сумма = 13

Задать свой вопрос
1 ответ
Program n_1;
var n, s, i, v:integer;
begin
s:=1;
writeln('Введите кол-во чисел');
readln(n);
for i:=1 to n do
begin
writeln('Введите число');
readln(v);
s:=s+v;
end;
writeln('s=',s);
end.







Алина Янгартер
НЕ РАБОТАЕТ!!! Вот что выдает:
Ангелина Кортошкина
Введите кол-во чисел: 3Введите число: 9Введите число: 3Введите число: 1Cумма = 11
Лугвенева Галина
У меня нормально выходит
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт