Дано несколько чисел. Вычислите их сумму. Сначала вводите количество N, затем вводится ровно N целых чисел. Язык программирования- Паскаль.
Ответы
Ответ дал:
0
program Tim;
var a, b, c, i: integer;
begin
write('Введите количество натуральных чисел ');
readln(a);
for i:=1 to a do begin
readln(c);
b+=c
end;
write('Ответ: ',b)
end.
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
7 лет назад
8 лет назад
8 лет назад