Ввести 7 чисел и найти их сумму используя только 3 переменных Помогите
Ввести 7 чисел и найти их сумму используя только 3 переменных
Помогите
Ответ(ы) на вопрос:
var
a,b,c:integer;
begin
for a:=1 to 7 do
begin
readln(b);
c:=c+b;
end;
writeln('Сумма ',c);
end.
Не нашли ответ?
Похожие вопросы