Ввести 7 чисел и найти их сумму используя только 3 переменных

Помогите

Question

Инюта

28 сентября, 05:55

+5

Ответы (1)

Знаете ответ на вопрос?

Нинуся · Answer 1

Var

a, b, c:integer;

begin

for a:=1 to 7 do

begin

readln (b) ;

c:=c+b;

end;

writeln ('Сумма ', c) ;

end.

Ввести 7 чисел и найти их сумму используя только 3 переменныхПомогите