Ответы
Ответ дал:
0
pascal:
var
i, sum, count: integer;
begin
for count := 0 to 7 do
begin
readln(i);
sum := sum + i;
end;
writeln(sum);
end.
Вас заинтересует
2 года назад
7 лет назад
7 лет назад
8 лет назад
8 лет назад