Program example; var a: array [1..7] of real; S: real; i: integer;
begin
for i := 1 to 7 do
read (a[i]);
S := 0;
for i := 1 to 7 do
S := S + a[i];
writeln (S);
end.

i = ⠀ 1⠀2 3 4 5 6 7
a[i] = 3 -2 9 7 -1 6 1
Что в числах S будет?

ДашаЕ1    3   06.02.2022 09:40    5